aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop/Keys.hs
diff options
context:
space:
mode:
authorJosh Rahm <joshuarahm@gmail.com>2023-12-09 01:00:48 -0700
committerJosh Rahm <joshuarahm@gmail.com>2023-12-09 01:00:48 -0700
commit4a507ae8021e4f672f251bb744e4179a3aec63b1 (patch)
treef373bbe0d0ab1a9d77581cdf30abe5472427316b /src/Rahm/Desktop/Keys.hs
parent7fcb150943032880abd5a0be6421a68b9cf234a5 (diff)
downloadrde-4a507ae8021e4f672f251bb744e4179a3aec63b1.tar.gz
rde-4a507ae8021e4f672f251bb744e4179a3aec63b1.tar.bz2
rde-4a507ae8021e4f672f251bb744e4179a3aec63b1.zip
Some better handling for pinned windows.
Diffstat (limited to 'src/Rahm/Desktop/Keys.hs')
-rw-r--r--src/Rahm/Desktop/Keys.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs
index e0b100a..3f3427d 100644
--- a/src/Rahm/Desktop/Keys.hs
+++ b/src/Rahm/Desktop/Keys.hs
@@ -834,8 +834,9 @@ keymap = runKeys $ do
shiftMod $
doc "Sink the current window into the tiling." $
- withFocused $
- windows . W.sink
+ withFocused $ \w -> do
+ unpinWindow w
+ (windows . W.sink) w
altMod $
doc "Spawn a floating terminal" $