diff options
| -rw-r--r-- | Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs index c438528..c633292 100644 --- a/Operations.hs +++ b/Operations.hs @@ -101,7 +101,7 @@ windows f = modify (\s -> s { windowset = f (windowset s) }) >> refresh hide :: Window -> X () hide w = withDisplay $ \d -> do (sw,sh) <- gets dimensions - io $ moveWindow d w (2*fromIntegral sw) (2*fromIntegral sh) + io $ moveWindow d w (2*sw) (2*sh) -- | refresh. Render the currently visible workspaces, as determined by -- the StackSet. Also, set focus to the focused window. |