aboutsummaryrefslogtreecommitdiffstats
path: root/Operations.hs
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-05-21 18:51:23 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-05-21 18:51:23 +0200
commitd72221f2d6b9937431e5c1340e62c19290034d5c (patch)
tree2fd21971e8d8b888076317db656314a5e32293e0 /Operations.hs
parente46be3af8f3ebda4c81d62175bb58ee1158a1d9d (diff)
downloadxmonad-d72221f2d6b9937431e5c1340e62c19290034d5c.tar.gz
xmonad-d72221f2d6b9937431e5c1340e62c19290034d5c.tar.xz
xmonad-d72221f2d6b9937431e5c1340e62c19290034d5c.zip
Remove redundant fromIntegrals
darcs-hash:20070521165123-a5988-02f5d32547cfd814fa615ae86c93b824e58b3a12.gz
Diffstat (limited to 'Operations.hs')
-rw-r--r--Operations.hs2
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.