hektor
/
dots
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add 'swallowEventHook'

main
Hektor Misplon 2024-03-30 16:50:15 +01:00
parent b6ba9ab4ea
commit e771a09fbe
Signed by: hektor
GPG Key ID: 5151AF79E723F21C
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
.xmonad/xmonad.hs
View File

@ -10,6 +10,7 @@ import XMonad.Hooks.ManageHelpers
import XMonad.Hooks.OnPropertyChange (onXPropertyChange)
import XMonad.Hooks.StatusBar
import XMonad.Hooks.StatusBar.PP
import XMonad.Hooks.WindowSwallowing (swallowEventHook)
import XMonad.Layout.CenteredIfSingle
import XMonad.Layout.IndependentScreens
import XMonad.Layout.PerScreen
@ -130,9 +131,12 @@ myLayoutHook =
-- handleEventHook {{{
myHandleEventHook =
onXPropertyChange "WM_NAME" myDynamicManageHook
<> handleEventHook def
handleEventHook def
-- See window swallowing (https://hackage.haskell.org/package/xmonad-contrib-0.18.0/docs/XMonad-Hooks-WindowSwallowing.html)
<> swallowEventHook (className =? "Alacritty") (return True)
<> onXPropertyChange "WM_NAME" myDynamicManageHook
<> Hacks.windowedFullscreenFixEventHook
<> hintsEventHook
-- }}}
-- }}}