aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop
diff options
context:
space:
mode:
authorJosh Rahm <joshuarahm@gmail.com>2024-02-03 16:56:54 -0700
committerJosh Rahm <joshuarahm@gmail.com>2024-02-03 16:56:54 -0700
commit07a79849230acba680b04cd0cbad085dfc18217b (patch)
tree88fa6b6c54714a090185924de7e1334191c873aa /src/Rahm/Desktop
parent63342cd6e7979eeb177a08d42868be972aab2b47 (diff)
parent464752ba36ad309606b6a9f63cd7c7fffa967a42 (diff)
downloadrde-07a79849230acba680b04cd0cbad085dfc18217b.tar.gz
rde-07a79849230acba680b04cd0cbad085dfc18217b.tar.bz2
rde-07a79849230acba680b04cd0cbad085dfc18217b.zip
Merge branch 'main' into wip_mapping_keycodes
Diffstat (limited to 'src/Rahm/Desktop')
-rw-r--r--src/Rahm/Desktop/Keys.hs50
1 files changed, 25 insertions, 25 deletions
diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs
index 0d24593..a4415da 100644
--- a/src/Rahm/Desktop/Keys.hs
+++ b/src/Rahm/Desktop/Keys.hs
@@ -738,23 +738,12 @@ bindings = do
altMod $ spawnX "sudo -A systemctl suspend && xsecurelock"
bind xK_x $ do
- shiftMod $
- doc "Reset the holes" $ do
- logs Debug "reset hole"
- sendMessage resetHole
- logs Debug "/reset hole"
-
justMod $
- doc "Add hole next to the current window" $ do
- logs Debug "Add hole"
- withFocused $ \foc ->
- withWindowSet $ \ws -> do
- logs Debug "/Add hole at %s" (show foc)
- whenJust (W.windowTilePosition foc ws) $ \tp -> do
- logs Debug "Tile position: %s" (show tp)
- (X.broadcastMessage . addHole) tp
- refresh
- logs Debug "/Add hole"
+ doc "Toggles respect for struts." $
+ sendMessage ToggleStruts
+ shiftMod $
+ doc "Remove the border from the focused window" $
+ withFocused $ setBorderWidth 0 . (: [])
bind xK_space $ do
justMod $
@@ -800,14 +789,6 @@ bindings = do
doc "Jump to the middle layout." $
sendMessage (toIndexedLayout (nLayouts `div` 2))
- bind xK_x $ do
- justMod $
- doc "Toggles respect for struts." $
- sendMessage ToggleStruts
- shiftMod $
- doc "Remove the border from the focused window" $
- withFocused $ setBorderWidth 0 . (: [])
-
bind xK_g $
(noMod -|- justMod) $
doc
@@ -828,6 +809,25 @@ bindings = do
[' '] -> restoreTheater Nothing
_ -> return ()
+ bind xK_x $ do
+ shiftMod $
+ doc "Reset the holes" $ do
+ logs Debug "reset hole"
+ sendMessage resetHole
+ logs Debug "/reset hole"
+
+ justMod $
+ doc "Add hole next to the current window" $ do
+ logs Debug "Add hole"
+ withFocused $ \foc ->
+ withWindowSet $ \ws -> do
+ logs Debug "/Add hole at %s" (show foc)
+ whenJust (W.windowTilePosition foc ws) $ \tp -> do
+ logs Debug "Tile position: %s" (show tp)
+ (X.broadcastMessage . addHole) tp
+ refresh
+ logs Debug "/Add hole"
+
let spaceResize = repeatable $ do
bind xK_bracketright $ do
noMod $
@@ -1456,7 +1456,7 @@ windowSpecificBindings config = do
noMod $
emitKey (controlMask, xK_F2)
where
- browsers = ["Google-chrome", "Brave-browser", "firefox-default"]
+ browsers = ["Google-chrome", "Brave-browser", "firefox-default", "Firefox"]
spotify = ["Spotify"]
-- Create a permutation from a list of modifiers.