From a8fb41f2fa0c3bff799ce990640290d8bf550d44 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Mon, 21 Nov 2016 20:06:34 -0800 Subject: [PATCH] [XMonad] Deactivate full when going or switching --- dotfiles/xmonad/xmonad.hs | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs index b0ebaad5..49dcfafc 100644 --- a/dotfiles/xmonad/xmonad.hs +++ b/dotfiles/xmonad/xmonad.hs @@ -148,6 +148,8 @@ toggleOr toggle toState action = setToggleActive' toggle toState >>= deactivateFullOr = toggleOr NBFULL False deactivateFullAnd action = sequence_ [deactivateFull, action] + +andDeactivateFull action = sequence_ [action, deactivateFull] -- Layout setup @@ -381,9 +383,9 @@ bindBringAndRaiseMany = concatMap (\(a, b, c, d) -> bindBringAndRaise a b c d) addKeys conf@XConfig {modMask = modm} = [ ((modm, xK_p), spawn "rofi -show drun") , ((modm .|. shiftMask, xK_p), spawn "rofi -show run") - , ((modm, xK_g), maybeUnminimizeAfter $ + , ((modm, xK_g), andDeactivateFull $ maybeUnminimizeAfter $ actionMenu myWindowBringerConfig greedyFocusWindow) - , ((modm, xK_b), myBringWindow myWindowBringerConfig) + , ((modm, xK_b), andDeactivateFull $ myBringWindow myWindowBringerConfig) , ((modm .|. shiftMask, xK_b), swapMinimizeStateAfter $ actionMenu myWindowBringerConfig swapFocusedWith) , ((modm .|. controlMask, xK_t), spawn