From 8cf4f9d29356cfa636efd9b6db440a6748120a80 Mon Sep 17 00:00:00 2001 From: Max Hohlfeld Date: Mon, 20 May 2024 14:41:28 +0200 Subject: [PATCH] refactor: remove deprecated xmonad func --- roles/xmonad/files/xmonad_qwerty.hs | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/roles/xmonad/files/xmonad_qwerty.hs b/roles/xmonad/files/xmonad_qwerty.hs index 4bfc543..ff9a32a 100644 --- a/roles/xmonad/files/xmonad_qwerty.hs +++ b/roles/xmonad/files/xmonad_qwerty.hs @@ -7,9 +7,9 @@ import XMonad.Actions.Search (SearchEngine, openstreetmap, hackage, wikipedia, y import XMonad.Hooks.DynamicLog (PP(..), dynamicLogWithPP, filterOutWsPP, xmobarPP, xmobarColor, wrap, shorten) import XMonad.Hooks.ManageDocks (ToggleStruts(..), avoidStruts, docks) -import XMonad.Hooks.DynamicProperty (dynamicPropertyChange) import XMonad.Hooks.SetWMName (setWMName) import XMonad.Hooks.WorkspaceHistory (workspaceHistoryHook) +import XMonad.Hooks.OnPropertyChange (onXPropertyChange) import XMonad.Layout.Spacing (Spacing, spacingRaw, Border (..)) import XMonad.Layout.LayoutModifier (ModifiedLayout) @@ -249,7 +249,9 @@ myManageHook = composeAll . concat $ myFloatingClasses = ["Gimp", "Origin"] myGames = ["Grim Dawn", "Der Herr der Ringe Online™", "Dota 2", "Project Zomboid", "Valheim", "Factorio", "Path of Exile", "Paradox Launcher", "Europa Universalis IV", "Bannerlord"] -myEventHook = dynamicPropertyChange "WM_NAME" (title =? "Database.kdbx - KeePassXC" <||> title =? "Database.kdbx [Gesperrt] - KeePassXC" --> floating) +myEventHook = mconcat + [ onXPropertyChange "WM_NAME" (title =? "Database.kdbx - KeePassXC" <||> title =? "Database.kdbx [Gesperrt] - KeePassXC" --> floating) + ] where floating = customFloating $ W.RationalRect (1/8) (1/8) (3/4) (3/4) -- Startup hook