feat: add startupHook

This commit is contained in:
♥ Minnie ♥ 2025-05-10 00:27:45 +08:00
parent 2e94d2bf96
commit a0f9cd85cb
Signed by: jasmine
GPG key ID: 8563E358D4E8040E

View file

@ -13,7 +13,7 @@ import XMonad.Layout.NoBorders
import XMonad.Layout.Renamed
import XMonad.Layout.Spacing
import XMonad.StackSet qualified as W
import XMonad.Util.EZConfig (additionalKeysP)
import XMonad.Util.EZConfig
import XMonad.Util.Loggers
import Graphics.X11.ExtraTypes.XF86
@ -44,6 +44,7 @@ myConfig = def
, focusedBorderColor = myFocusedBorderColor
, workspaces = myWorkspaces
, manageHook = myManageHook
, startupHook = myStartupHook
} `additionalKeysP` myKeybindings
@ -236,3 +237,9 @@ myManageHook = composeAll
, className =? "Tk" --> doFloat -- python gui development
, className =? "TkFDialog" --> doFloat -- ^^
]
--
-- StartupHook
--
myStartupHook = pass >> checkKeymap myConfig myKeybindings