diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-05-21 18:51:23 +0200 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-05-21 18:51:23 +0200 |
| commit | 3e91fa78af921cde809383b550245fab55873f13 (patch) | |
| tree | 2fd21971e8d8b888076317db656314a5e32293e0 | |
| parent | 3ad369596272d5087c7191f2bf4a0c01eeceb09f (diff) | |
| download | metatile-3e91fa78af921cde809383b550245fab55873f13.tar metatile-3e91fa78af921cde809383b550245fab55873f13.zip | |
Remove redundant fromIntegrals
darcs-hash:20070521165123-a5988-02f5d32547cfd814fa615ae86c93b824e58b3a12
| -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. |