From de4503f1b2a8167caaee34714b55da15dbc7128f Mon Sep 17 00:00:00 2001 From: Josh Rahm Date: Mon, 28 Mar 2022 12:11:48 -0600 Subject: Figured out the flakiness was due to withAll only applying to windows on the current workspace instead of _all_ windows. Poor naming. --- src/Main.hs | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/src/Main.hs b/src/Main.hs index 0514a99..8abee5e 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -11,8 +11,8 @@ import XMonad.Layout.Fullscreen (fullscreenEventHook) import System.Environment (setEnv) import Data.Monoid -import Internal.XMobarLog import Internal.Windows +import Internal.XMobarLog import Internal.Keys import Internal.Layout import Internal.Logger @@ -41,8 +41,16 @@ main = do -- the current tab! This makes it consistent with the rest of the -- world ... ctrl+w deletes the last word (ctrl+backspace). rebindKey (controlMask, xK_w) (controlMask, xK_BackSpace) + + -- Terminal Ctrl-H sends a backspace. (Technically not, but that's + -- usually the semantics). Make it this way in Chrome. , rebindKey (controlMask, xK_h) (0, xK_BackSpace) + + -- Ctrl+u usually deletes the whole line. This is roughly + -- ctrl+shift+backspace , rebindKey (controlMask, xK_u) (controlMask .|. shiftMask, xK_BackSpace) + + -- Make it to ctrl+b deletes the current tab instead of ctrl+w. , rebindKey (controlMask, xK_b) (controlMask, xK_w) ] ]) $ def -- cgit