aboutsummaryrefslogtreecommitdiff
path: root/src/Internal/Keys.hs
diff options
context:
space:
mode:
authorJosh Rahm <rahm@google.com>2021-11-03 17:34:26 -0600
committerJosh Rahm <rahm@google.com>2021-11-03 17:34:26 -0600
commit3464c1dbb093b8a5729c40cc51f4448fd3e43337 (patch)
treeb7f524ebdd84aa2fef430ce99645f9f113a33c04 /src/Internal/Keys.hs
parent63b6a57db25652853b574239dc1b8f1f5f614a9e (diff)
downloadrde-3464c1dbb093b8a5729c40cc51f4448fd3e43337.tar.gz
rde-3464c1dbb093b8a5729c40cc51f4448fd3e43337.tar.bz2
rde-3464c1dbb093b8a5729c40cc51f4448fd3e43337.zip
Change the strut behavior.
It wasn't working as expected for flips. This is because the avoidStructs layout modifier was too low in the layout stack.
Diffstat (limited to 'src/Internal/Keys.hs')
-rw-r--r--src/Internal/Keys.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Internal/Keys.hs b/src/Internal/Keys.hs
index 75c70a3..09d0cc8 100644
--- a/src/Internal/Keys.hs
+++ b/src/Internal/Keys.hs
@@ -1,6 +1,7 @@
{-# LANGUAGE RankNTypes #-}
module Internal.Keys where
+import XMonad.Hooks.ManageDocks
import XMonad.Layout.MosaicAlt
import Graphics.X11.ExtraTypes.XorgDefault
import System.Process
@@ -159,6 +160,7 @@ newKeys markContext =
, ((modm .|. mod1Mask, xK_a), runXPlus markContext config (withScreen W.greedyView 0))
, ((modm .|. mod1Mask, xK_o), runXPlus markContext config (withScreen W.greedyView 1))
, ((modm .|. mod1Mask, xK_e), runXPlus markContext config (withScreen W.greedyView 2))
+ , ((modm, xK_b), sendMessage ToggleStruts)
-- Buttons programmed on my mouse.
, ((shiftMask, xK_F1), click >> (withFocused $ windows . W.sink))