aboutsummaryrefslogtreecommitdiff
path: root/gui/conf/xmonad.hs
diff options
context:
space:
mode:
Diffstat (limited to 'gui/conf/xmonad.hs')
-rw-r--r--gui/conf/xmonad.hs12
1 files changed, 9 insertions, 3 deletions
diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs
index 71990e9..359e312 100644
--- a/gui/conf/xmonad.hs
+++ b/gui/conf/xmonad.hs
@@ -3,6 +3,7 @@ import XMonad.Util.EZConfig
import XMonad.StackSet
import XMonad.Hooks.EwmhDesktops
+import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.InsertPosition
import XMonad.Layout.NoBorders
@@ -128,6 +129,11 @@ customEventHook = do
handleEventHook def
fullscreenEventHook
+customManageHook = composeOne
+ [ transience
+ , isDialog -?> doCenterFloat
+ , pure True -?> insertPosition Below Newer <+> namedScratchpadManageHook scratchpads ]
+
customLogHook = do
historyHook
customizeBorderWhen (isFloat <&&> isNotFullscreen) "#aadb0f" 6
@@ -141,9 +147,9 @@ main = xmonad $ ewmh
, keys = \c -> mkKeymap c keybindings
, startupHook = return () >> checkKeymap def keybindings
, handleEventHook = customEventHook
- , layoutHook = availableLayouts
- , manageHook = insertPosition Below Newer <+> namedScratchpadManageHook scratchpads
- , logHook = customLogHook }
+ , manageHook = customManageHook
+ , logHook = customLogHook
+ , layoutHook = availableLayouts }
`additionalKeys`
[ ((noModMask, xK_Menu) , namedScratchpadAction scratchpads "terminal") ]