diff options
| author | Josh Rahm <rahm@google.com> | 2024-08-23 14:14:13 -0600 |
|---|---|---|
| committer | Josh Rahm <rahm@google.com> | 2024-08-23 14:14:13 -0600 |
| commit | 3335b25d36d7b1d4e8f6b5a45dd459530617fe35 (patch) | |
| tree | 1821566d20275b17595c118364928907aefca749 /src/Rahm/Desktop/Keys.hs | |
| parent | fe786068cab9340c796c5274e00a8b2dbe077c54 (diff) | |
| download | rde-3335b25d36d7b1d4e8f6b5a45dd459530617fe35.tar.gz rde-3335b25d36d7b1d4e8f6b5a45dd459530617fe35.tar.bz2 rde-3335b25d36d7b1d4e8f6b5a45dd459530617fe35.zip | |
Add explode layout modifier and make it toggleable with <M-z>c
Diffstat (limited to 'src/Rahm/Desktop/Keys.hs')
| -rw-r--r-- | src/Rahm/Desktop/Keys.hs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs index 57ca2e0..17b5c11 100644 --- a/src/Rahm/Desktop/Keys.hs +++ b/src/Rahm/Desktop/Keys.hs @@ -141,6 +141,7 @@ import XMonad.Layout.Spacing import XMonad.Util.Run (safeSpawn) import XMonad.Util.WindowProperties import Prelude hiding ((!!)) +import Rahm.Desktop.Layout.Explode (toggleExplode) type KeyMap l = XConfig l -> Map (KeyMask, KeySym) (X ()) @@ -900,6 +901,13 @@ bindings = do noMod mediaNextDoc rawMask shiftMask mediaSeekFDoc + -- Explode + bind xK_c $ do + noMod -|- justMod $ + doc "Toggle explode on the workspace" $ + sendMessage toggleExplode + + bindOtherKeys $ \(_, _, s) -> logs Info "Unhandled key pressed: %s" s |