aboutsummaryrefslogtreecommitdiff
path: root/src/Internal/Keys.hs
diff options
context:
space:
mode:
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))