diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-02 19:52:58 +0200 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-02 19:52:58 +0200 |
commit | 94e532991069618f9614678c90c7995da681504a (patch) | |
tree | 4ec864613f8ee899c8bbc2f02091346c6a6c7fae | |
parent | 2c15be858609891fdf4d6e24566264d5a90f3fd1 (diff) | |
download | xmonad-94e532991069618f9614678c90c7995da681504a.tar.gz xmonad-94e532991069618f9614678c90c7995da681504a.tar.xz xmonad-94e532991069618f9614678c90c7995da681504a.zip |
Refactor, ignore desktop_window too
darcs-hash:20071002175258-a5988-a21ad4cf3a287da86374b7264b6e11ea34cd4ef1.gz
-rw-r--r-- | Config.hs | 9 |
1 files changed, 6 insertions, 3 deletions
@@ -66,11 +66,14 @@ defaultGaps = [(0,0,0,0)] -- 15 for default dzen -- | manageHook. Execute arbitrary actions and WindowSet manipulations when -- managing a new window. 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) + +-- Don't manage various panels and desktop windows: +manageHook w (_, c, _) | c `elem` ignore = reveal w >> return (W.delete w) + where ignore = ["gnome-panel", "kicker", "desktop_window"] + -- The default rule, do not edit this line. manageHook _ _ = return id |