aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-10-03 18:16:43 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-10-03 18:16:43 +0200
commit85969515078f1273596e5b64e23678aab1d9df94 (patch)
tree64d0dd67b5bfabc2a98a22e7418488618487028a
parent7d62545adaa7d6e9d03647323c76615f7f3e7226 (diff)
downloadxmonad-85969515078f1273596e5b64e23678aab1d9df94.tar.gz
xmonad-85969515078f1273596e5b64e23678aab1d9df94.tar.xz
xmonad-85969515078f1273596e5b64e23678aab1d9df94.zip
Pointfree
darcs-hash:20071003161643-a5988-ae0d1955200eb63560a8ed8b0cf45fa11bde2241.gz
-rw-r--r--Config.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Config.hs b/Config.hs
index 4b4490b..ba4b70c 100644
--- a/Config.hs
+++ b/Config.hs
@@ -67,7 +67,7 @@ defaultGaps = [(0,0,0,0)] -- 15 for default dzen
manageHook :: Window -> (String, String, String) -> X (WindowSet -> WindowSet)
-- Float various windows:
-manageHook w (_, _, c) | c `elem` floats = do (_, rr) <- floatLocation w; return (W.float w rr)
+manageHook w (_, _, c) | c `elem` floats = fmap (W.float w . snd) (floatLocation w)
where floats = ["MPlayer", "Gimp"]
-- Don't manage various panels and desktop windows: