Add 'swallowEventHook'
parent
b6ba9ab4ea
commit
e771a09fbe
|
@ -10,6 +10,7 @@ import XMonad.Hooks.ManageHelpers
|
||||||
import XMonad.Hooks.OnPropertyChange (onXPropertyChange)
|
import XMonad.Hooks.OnPropertyChange (onXPropertyChange)
|
||||||
import XMonad.Hooks.StatusBar
|
import XMonad.Hooks.StatusBar
|
||||||
import XMonad.Hooks.StatusBar.PP
|
import XMonad.Hooks.StatusBar.PP
|
||||||
|
import XMonad.Hooks.WindowSwallowing (swallowEventHook)
|
||||||
import XMonad.Layout.CenteredIfSingle
|
import XMonad.Layout.CenteredIfSingle
|
||||||
import XMonad.Layout.IndependentScreens
|
import XMonad.Layout.IndependentScreens
|
||||||
import XMonad.Layout.PerScreen
|
import XMonad.Layout.PerScreen
|
||||||
|
@ -130,9 +131,12 @@ myLayoutHook =
|
||||||
|
|
||||||
-- handleEventHook {{{
|
-- handleEventHook {{{
|
||||||
myHandleEventHook =
|
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)
|
||||||
<> Hacks.windowedFullscreenFixEventHook
|
<> swallowEventHook (className =? "Alacritty") (return True)
|
||||||
|
<> onXPropertyChange "WM_NAME" myDynamicManageHook
|
||||||
|
<> Hacks.windowedFullscreenFixEventHook
|
||||||
|
<> hintsEventHook
|
||||||
-- }}}
|
-- }}}
|
||||||
|
|
||||||
-- }}}
|
-- }}}
|
||||||
|
|
Loading…
Reference in New Issue