From 50e21f7fadb046f5626ce2783df0f6f1663bde94 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Fri, 14 Apr 2017 21:08:11 -0700 Subject: [PATCH] [XMonad] Go back to normal fullscreen (instead of DWIM) --- dotfiles/xmonad/xmonad.hs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs index ae2c7054..c6b5906e 100644 --- a/dotfiles/xmonad/xmonad.hs +++ b/dotfiles/xmonad/xmonad.hs @@ -522,6 +522,9 @@ actOnWindowsInWorkspace :: (Window -> X ()) actOnWindowsInWorkspace windowAction getWindowsAction = restoreFocus $ withWorkspace (getWindowsAction >=> mapM_ windowAction) +-- XXX: The idea behind this was that the normal fullscreen can be annoying if a +-- new window opens, but this behavior is even more annoying than that, so +-- nevermind goFullscreenDWIM = withWorkspace $ \ws -> do wins <- windowsWithFocusedClass ws @@ -745,7 +748,7 @@ addKeys conf@XConfig { modMask = modm } = , ((modm, xK_g), myGoToWindow) , ((modm, xK_b), myBringWindow) , ((modm .|. shiftMask, xK_b), myReplaceWindow) - , ((modm .|. controlMask, xK_space), deactivateFullOr goFullscreenDWIM) + , ((modm .|. controlMask, xK_space), deactivateFullOr goFullscreen) , ((modm, xK_m), withFocused minimizeWindow) , ((modm .|. shiftMask, xK_m), deactivateFullOr $ withLastMinimized maximizeWindowAndFocus)