Fix deprecated 'dynamicPropertyChange'

This commit is contained in:
2024-03-30 16:00:54 +01:00
parent 0b59f1db5c
commit a22650254a

View File

@@ -4,7 +4,7 @@ import XMonad
import XMonad.Actions.CopyWindow (copyToAll, killAllOtherCopies) import XMonad.Actions.CopyWindow (copyToAll, killAllOtherCopies)
import XMonad.Actions.FloatSnap import XMonad.Actions.FloatSnap
import Control.Monad (liftM2) import Control.Monad (liftM2)
import XMonad.Hooks.DynamicProperty import XMonad.Hooks.OnPropertyChange (onXPropertyChange)
import XMonad.Hooks.EwmhDesktops import XMonad.Hooks.EwmhDesktops
import XMonad.Hooks.ManageDocks import XMonad.Hooks.ManageDocks
import XMonad.Hooks.ManageHelpers import XMonad.Hooks.ManageHelpers
@@ -158,7 +158,7 @@ myConfig =
startupHook = myStartupHook, startupHook = myStartupHook,
manageHook = myManageHook <+> manageHook def, manageHook = myManageHook <+> manageHook def,
layoutHook = avoidStruts myLayoutHook, layoutHook = avoidStruts myLayoutHook,
handleEventHook = dynamicPropertyChange "WM_NAME" myDynamicManageHook <> handleEventHook def <> Hacks.windowedFullscreenFixEventHook handleEventHook = onXPropertyChange "WM_NAME" myDynamicManageHook <> handleEventHook def <> Hacks.windowedFullscreenFixEventHook
} }
`removeKeysP` myRemoveKeys `removeKeysP` myRemoveKeys
`additionalKeysP` myKeys `additionalKeysP` myKeys