[XMonad] Add dynamic workspace bindings

2017-02-16 17:40:58 -08:00 · 2017-02-16 17:40:58 -08:00 · 9d5534539a
commit 9d5534539a
parent 978f54e921
1 changed files with 3 additions and 0 deletions
--- a/dotfiles/xmonad/xmonad.hs
+++ b/dotfiles/xmonad/xmonad.hs
@ -697,6 +697,9 @@ addKeys conf@XConfig {modMask = modm} =
    , ((mod3Mask .|. controlMask, xK_1), toggleFadingForActiveScreen)
    , ((mod3Mask, xK_t), selectToggle)
    , ((modalt, xK_4), selectLimit)
+    , ((mod3Mask, xK_3), addWorkspacePrompt def)
+    , ((modalt, xK_3), selectWorkspace def)
+    , ((mod3Mask .|. mod1Mask, xK_3), removeWorkspace)

    -- Non-XMonad