From e535a0eb7b38b7488170065441f9898b17e58625 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Tue, 13 Sep 2016 17:51:12 -0700 Subject: [PATCH] Add manageDocks to manageHook --- dotfiles/xmonad/xmonad.hs | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs index e5f6717c..5a56ed14 100644 --- a/dotfiles/xmonad/xmonad.hs +++ b/dotfiles/xmonad/xmonad.hs @@ -18,10 +18,11 @@ main = do xmonad $ ewmh def { modMask = myModMask , terminal = "urxvt" - , layoutHook = avoidStruts $ layoutHook def + , manageHook = manageDocks <+> manageHook def + , layoutHook = myLayoutHook , logHook = dynamicLogWithPP xmobarPP { ppOutput = hPutStrLn xmproc - , ppTitle = xmobarColor "green" "" . shorten 50 + , ppTitle = xmobarColor "blue" "" . shorten 50 } , handleEventHook = handleEventHook def <+> fullscreenEventHook , startupHook = myStartup @@ -32,6 +33,8 @@ main = do , ((myModMask, xK_b), spawn "rofi -show run") ] +myLayoutHook = avoidStruts $ layoutHook def + myStartup :: X() myStartup = do spawn "stalonetray"