aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop/Keys.hs
diff options
context:
space:
mode:
authorJosh Rahm <joshuarahm@gmail.com>2024-01-05 13:29:32 -0700
committerJosh Rahm <joshuarahm@gmail.com>2024-01-30 21:02:59 -0700
commit53cc84ffd9212c2253e33cab1267cfcd272f5e11 (patch)
tree539130d38e8876298a0df8170f8a2d87b46ff527 /src/Rahm/Desktop/Keys.hs
parent32ced7e1ae51b2c7f431e4c627479c7973187f62 (diff)
downloadrde-53cc84ffd9212c2253e33cab1267cfcd272f5e11.tar.gz
rde-53cc84ffd9212c2253e33cab1267cfcd272f5e11.tar.bz2
rde-53cc84ffd9212c2253e33cab1267cfcd272f5e11.zip
Add ability to move floating windows around using mod+shift+{l,h}
Diffstat (limited to 'src/Rahm/Desktop/Keys.hs')
-rw-r--r--src/Rahm/Desktop/Keys.hs8
1 files changed, 6 insertions, 2 deletions
diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs
index 5aad26d..7bceeef 100644
--- a/src/Rahm/Desktop/Keys.hs
+++ b/src/Rahm/Desktop/Keys.hs
@@ -492,7 +492,9 @@ bindings = do
shiftMod $
doc "Swap the current window with the next one down in the stack" $
- windows W.swapDown
+ withFocused $ \w ->
+ withWindowsUnpinned [w] $
+ windows W.swapDownOrMirror
controlMod $
doc
@@ -522,7 +524,9 @@ bindings = do
shiftMod $
doc "Swap the currently focused window with the next window in the stack." $
- windows W.swapUp
+ withFocused $ \w ->
+ withWindowsUnpinned [w] $
+ windows W.swapUpOrMirror
controlMod $
doc