diff options
Diffstat (limited to 'lib/Phi/X11.hs')
-rw-r--r-- | lib/Phi/X11.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Phi/X11.hs b/lib/Phi/X11.hs index 709d04a..24f0986 100644 --- a/lib/Phi/X11.hs +++ b/lib/Phi/X11.hs @@ -86,7 +86,7 @@ runPhi xconfig config widgets = do screens <- liftIO $ phiXScreenInfo xconfig disp dispmvar <- liftIO $ newMVar disp - let dispvar = Widget.Display dispmvar atoms + let dispvar = Widget.Display dispmvar atoms screens widgetStates <- liftIO $ mapM (Widget.createWidgetState phi dispvar) widgets Widget.withDisplay dispvar $ \disp -> do @@ -172,7 +172,7 @@ updatePanels disp redraw = do setSource pattern paint restore - Widget.renderWidgets layoutedWidgets + Widget.renderWidgets layoutedWidgets $ panelScreenArea panel return panel' |