mirror of
https://github.com/xmonad/xmonad.git
synced 2025-08-10 00:51:53 -07:00
Refactor, ignore desktop_window too
This commit is contained in:
@@ -66,11 +66,14 @@ defaultGaps = [(0,0,0,0)] -- 15 for default dzen
|
|||||||
-- | manageHook. Execute arbitrary actions and WindowSet manipulations when
|
-- | manageHook. Execute arbitrary actions and WindowSet manipulations when
|
||||||
-- managing a new window.
|
-- managing a new window.
|
||||||
manageHook :: Window -> (String, String, String) -> X (WindowSet -> WindowSet)
|
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:
|
-- Float mplayer windows:
|
||||||
manageHook w (_, _, "MPlayer") = do (_, rr) <- floatLocation w; return (W.float w rr)
|
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.
|
-- The default rule, do not edit this line.
|
||||||
manageHook _ _ = return id
|
manageHook _ _ = return id
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user