summaryrefslogtreecommitdiffstats
path: root/Config.hs
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-10-02 19:47:22 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-10-02 19:47:22 +0200
commit34bd103d9a052043400625bd8e6edc4125a6eab9 (patch)
treea018ee7f7dea4a39c5c4813bc347de99b106b57b /Config.hs
parent51b5f15f9c473b885afd4bdcc05db08075d8cd75 (diff)
downloadmetatile-34bd103d9a052043400625bd8e6edc4125a6eab9.tar
metatile-34bd103d9a052043400625bd8e6edc4125a6eab9.zip
Automatically float MPlayer windows
darcs-hash:20071002174722-a5988-f38377d6cb1338e6861d6cc2ef2b986ca39fdbaf
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Config.hs b/Config.hs
index 0979ab2..a4dec5e 100644
--- a/Config.hs
+++ b/Config.hs
@@ -69,6 +69,8 @@ manageHook :: Window -> (String, String, String) -> X (WindowSet -> WindowSet)
-- Don't manage Gnome's panel or KDE's kicker:
manageHook w (_, "gnome-panel", _) = reveal w >> return (W.delete w)
manageHook w (_, "kicker", _) = reveal w >> return (W.delete w)
+-- Float mplayer windows:
+manageHook w (_, _, "MPlayer") = do (_, rr) <- floatLocation w; return (W.float w rr)
-- The default rule, do not edit this line.
manageHook _ _ = return id