aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--xmonad.hs18
1 files changed, 17 insertions, 1 deletions
diff --git a/xmonad.hs b/xmonad.hs
index d4795212..c47df6a8 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -24,7 +24,7 @@ import XMonad.Layout.WindowNavigation as WN
import XMonad.Layout.WindowArranger (windowArrange, WindowArrangerMsg(..))
-- Layouts
-import XMonad.Layout.BinarySpacePartition
+import XMonad.Layout.BinarySpacePartition as BSP
import XMonad.Layout.Grid
import XMonad.Layout.ThreeColumns
-- import XMonad.Layout.SimplestFloat
@@ -149,6 +149,22 @@ myKeys = [
, ((mod1Mask, xK_bracketleft), sendMessage $ ToggleStrut D) -- toggle bottom bar
, ((mod1Mask, xK_bracketright), sendMessage $ ToggleStrut U) -- toggle top bar
+ -- BSP layout keybindings
+ -- resize
+ , ((mod4Mask .|. mod1Mask, xK_l ), sendMessage $ ExpandTowards R)
+ , ((mod4Mask .|. mod1Mask, xK_h ), sendMessage $ ExpandTowards L)
+ , ((mod4Mask .|. mod1Mask, xK_j ), sendMessage $ ExpandTowards D)
+ , ((mod4Mask .|. mod1Mask, xK_k ), sendMessage $ ExpandTowards U)
+ , ((mod4Mask .|. mod1Mask .|. shiftMask , xK_l ), sendMessage $ ShrinkFrom R)
+ , ((mod4Mask .|. mod1Mask .|. shiftMask , xK_h ), sendMessage $ ShrinkFrom L)
+ , ((mod4Mask .|. mod1Mask .|. shiftMask , xK_j ), sendMessage $ ShrinkFrom D)
+ , ((mod4Mask .|. mod1Mask .|. shiftMask , xK_k ), sendMessage $ ShrinkFrom U)
+ -- other
+ , ((mod1Mask, xK_r ), sendMessage Rotate)
+ , ((mod1Mask, xK_s ), sendMessage BSP.Swap)
+-- , ((mod4Mask .|. shiftMask .|. controlMask , xK_j ), sendMessage $ SplitShift Prev)
+-- , ((mod4Mask .|. shiftMask .|. controlMask , xK_k ), sendMessage $ SplitShift Next)
+
] ++ [ -- for extra workspace(s)
((myModMask, key), (windows $ W.greedyView ws))
| (key,ws) <- myExtraWorkspaces