diff options
Diffstat (limited to 'lib/Phi/X11.hs')
-rw-r--r-- | lib/Phi/X11.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Phi/X11.hs b/lib/Phi/X11.hs index 24f0986..3930826 100644 --- a/lib/Phi/X11.hs +++ b/lib/Phi/X11.hs @@ -162,7 +162,7 @@ updatePanels disp redraw = do area = panelArea panel newPanel <- if not redraw then return panel else do - let layoutedWidgets = withDimension area $ Widget.layoutWidgets (panelWidgetStates panel) 0 0 + let layoutedWidgets = (withDimension area $ Widget.layoutWidgets (panelWidgetStates panel) 0 0) $ panelScreenArea panel panel' = panel { panelWidgetStates = layoutedWidgets } renderWith buffer $ do |