summaryrefslogtreecommitdiffstats
path: root/XMonad/ManageHook.hs
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad/ManageHook.hs')
-rw-r--r--XMonad/ManageHook.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/ManageHook.hs b/XMonad/ManageHook.hs
index 072fe1f..904b99f 100644
--- a/XMonad/ManageHook.hs
+++ b/XMonad/ManageHook.hs
@@ -71,7 +71,7 @@ doF = return . Endo
-- | Move the window to the floating layer.
doFloat :: ManageHook
-doFloat = ask >>= \w -> doF . W.float w . snd =<< liftX (floatLocation w)
+doFloat = ask >>= \w -> doF . W.float w =<< liftX (floatLocation w)
-- | Map the window and remove it from the 'WindowSet'.
doIgnore :: ManageHook