Change keys to make H+Space a leader key for doing layout related stuff. Not sure how I feel about it right now; it'll take some getting used to.

1 files changed, 34 insertions, 10 deletions

diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs
index 5284a9d..33830dc 100644
--- a/src/Rahm/Desktop/Keys.hs
+++ b/src/Rahm/Desktop/Keys.hs
@@ -263,7 +263,7 @@ keymap = runKeys $ do
     justMod $
       doc "Goto a workspace\n\n\t\
 
-      \If the second character typed is alpha-numberic, jump to that\n\t\
+      \If the second character typed is alpha-numeric, jump to that\n\t\
       \workspace. The workspace is created on-the-fly if such a workspace\n\t\
       \does not exist.\n\n\t\
 
@@ -412,15 +412,39 @@ keymap = runKeys $ do
     altMod $ spawnX "sudo -A systemctl suspend && xsecurelock"
 
   bind xK_space $ do
-    justMod  $
-      doc "Use the next layout in the layout list." $ sendMessage toNextLayout
-
-    altMod   $
-      doc "Reset the layout to the default layout." $ sendMessage toFirstLayout
-
-    shiftMod $
-      doc "Use the previous layout in the layout list." $
-        sendMessage toPreviousLayout
+    justMod $ subkeys $ do
+      
+      bind xK_n $
+        noMod $ doc "Use the next layout in the layout list." $
+          sendMessage toNextLayout
+
+      bind xK_p $
+        noMod $ doc "Use the previous layout in thelayout list." $
+          sendMessage toPreviousLayout
+
+      bind xK_b $
+        noMod $ doc "Go back to the first layout in the layout list." $
+          sendMessage toFirstLayout
+
+      bind xK_h $
+        noMod $ doc "Flip the layout across the horizontal axis" $
+          sendMessage flipVertically
+
+      bind xK_v $
+        noMod $ doc "Flip the layout across the vertical axis" $
+          sendMessage flipHorizontally
+
+      bind xK_r $
+        noMod $ doc "Rotate the layout 90 degrees" $
+          sendMessage rotateLayout
+
+      bind xK_t $
+        noMod $ doc "Toggle the pop window" $
+          sendMessage togglePop
+
+      bind xK_x $
+        noMod $ doc "Toggle the hole" $
+          sendMessage toggleHole
 
   bind xK_t $ do
     justMod  $