summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authortdback <tyler@tdback.net>2025-02-22 19:25:07 -0500
committertdback <tyler@tdback.net>2025-02-22 19:25:07 -0500
commit0ab8a76e694b0398a6f5ef1c522f1a0317c55f19 (patch)
treef1705d115720ca31ad0623a36b108991276e869b
parent762f43e5e828373e7a6ec88b876e372c8c32c240 (diff)
lib/KeyBindings: add layout-specific bindings for spawning a browserHEADmain
-rw-r--r--lib/KeyBindings.hs7
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/KeyBindings.hs b/lib/KeyBindings.hs
index 8396b94..8aaf529 100644
--- a/lib/KeyBindings.hs
+++ b/lib/KeyBindings.hs
@@ -16,7 +16,8 @@ import qualified WindowState as WS
import qualified XMonad.StackSet as W
myColemak modm =
- [ ((modm, xK_h), refresh)
+ [ ((modm, xK_v), safeSpawn myBrowser [])
+ , ((modm, xK_h), refresh)
, ((modm, xK_t), sendMessage $ Toggle FULL)
, ((modm .|. shiftMask, xK_t), withFocused WS.toggleFloat)
, ((modm, xK_space), sendMessage NextLayout)
@@ -40,7 +41,8 @@ myColemak modm =
]
myQwerty modm =
- [ ((modm, xK_n), refresh)
+ [ ((modm, xK_b), safeSpawn myBrowser [])
+ , ((modm, xK_n), refresh)
, ((modm, xK_f), sendMessage $ Toggle FULL)
, ((modm .|. shiftMask, xK_f), withFocused WS.toggleFloat)
, ((modm, xK_space), sendMessage NextLayout)
@@ -67,7 +69,6 @@ myKeys :: XConfig Layout -> M.Map (KeyMask, KeySym) (X ())
myKeys conf@(XConfig{XMonad.modMask = modm}) =
M.fromList $
[ ((modm .|. shiftMask, xK_Return), safeSpawn (XMonad.terminal conf) [])
- , ((modm, xK_b), safeSpawn myBrowser [])
, ((modm .|. shiftMask, xK_c), kill)
, ((modm, xK_q), spawn "xmonad --recompile && xmonad --restart")
, ((0, xF86XK_AudioPrev), spawn "mpc prev")