From 2ec96d9c2482ecf55358bdb4218c60dadd8aecbd Mon Sep 17 00:00:00 2001 From: Matthias Schiffer Date: Tue, 1 Mar 2011 02:31:21 +0100 Subject: Forget empty window groups --- xmonad.hs | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) (limited to 'xmonad.hs') diff --git a/xmonad.hs b/xmonad.hs index b66154a..6c8b522 100644 --- a/xmonad.hs +++ b/xmonad.hs @@ -93,12 +93,10 @@ myManageHook :: ManageHook myManageHook = composeAll [ isDialog --> doFloat , composeOne - [ className =? "Guake.py" -?> (doFloatMaybeFullscreen <+> doIgnoreProcessWorkspace) -- <+> doConfigBorderOff) - --, className =? "Do" -?> (doFloat <+> doConfigBorderOff) - , className =? "Gmpc" -?> doIgnoreProcessWorkspace - , className =? "Liferea" -?> doIgnoreProcessWorkspace - , className =? "Gnome-session" -?> doIgnoreProcessWorkspace + [ className =? "Guake.py" -?> doFloatMaybeFullscreen -- <+> doConfigBorderOff) + --, className =? "Do" -?> (doFloat <+> doConfigBorderOff) , className =? "MPlayer" -?> doCenterFloat + , className =? "Gnome-session" -?> doIgnoreProcessWorkspace , className =? "Gimp" -?> doFloat , className =? "Display" -?> doFloat , className =? "Wine" -?> doFloat @@ -111,7 +109,7 @@ myManageHook = composeAll ] -myLayoutHook = processWorkspaceStorage $ manageFullscreen $ smartBorders (Full ||| tiled ||| Mirror tiled) +myLayoutHook = processWorkspaceManager $ manageFullscreen $ smartBorders (Full ||| tiled ||| Mirror tiled) where -- default tiling algorithm partitions the screen into two panes tiled = ResizableTall nmaster delta ratio [] @@ -127,5 +125,6 @@ myLayoutHook = processWorkspaceStorage $ manageFullscreen $ smartBorders (Full | myEventHook :: Event -> X All myEventHook ev = do + handleForgetEmptyWindowGroups ev handleFullscreen ev (handleEventHook gnomeConfig) ev -- cgit v1.2.3