diff options
| -rw-r--r-- | XMonad/Config.hs | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/XMonad/Config.hs b/XMonad/Config.hs index b5da4cb..e577e3d 100644 --- a/XMonad/Config.hs +++ b/XMonad/Config.hs @@ -111,12 +111,11 @@ defaultGaps = [(0,0,0,0)] -- 15 for default dzen font -- and click on the client you're interested in. -- manageHook :: ManageHook -manageHook = composeAll . concat $ - [ [ className =? c --> doFloat | c <- floats] - , [ resource =? r --> doIgnore | r <- ignore] - , [ resource =? "Gecko" --> doF (W.shift "web") ]] - where floats = ["MPlayer", "Gimp"] - ignore = ["gnome-panel", "desktop_window", "kicker", "kdesktop"] +manageHook = composeAll + [ className =? "MPlayer" --> doFloat + , className =? "Gimp" --> doFloat + , resource =? "desktop_window" --> doIgnore + , resource =? "kdesktop" --> doIgnore ] ------------------------------------------------------------------------ -- Logging |