feat: add startupHook
This commit is contained in:
parent
2e94d2bf96
commit
a0f9cd85cb
1 changed files with 8 additions and 1 deletions
|
@ -13,7 +13,7 @@ import XMonad.Layout.NoBorders
|
||||||
import XMonad.Layout.Renamed
|
import XMonad.Layout.Renamed
|
||||||
import XMonad.Layout.Spacing
|
import XMonad.Layout.Spacing
|
||||||
import XMonad.StackSet qualified as W
|
import XMonad.StackSet qualified as W
|
||||||
import XMonad.Util.EZConfig (additionalKeysP)
|
import XMonad.Util.EZConfig
|
||||||
import XMonad.Util.Loggers
|
import XMonad.Util.Loggers
|
||||||
|
|
||||||
import Graphics.X11.ExtraTypes.XF86
|
import Graphics.X11.ExtraTypes.XF86
|
||||||
|
@ -44,6 +44,7 @@ myConfig = def
|
||||||
, focusedBorderColor = myFocusedBorderColor
|
, focusedBorderColor = myFocusedBorderColor
|
||||||
, workspaces = myWorkspaces
|
, workspaces = myWorkspaces
|
||||||
, manageHook = myManageHook
|
, manageHook = myManageHook
|
||||||
|
, startupHook = myStartupHook
|
||||||
} `additionalKeysP` myKeybindings
|
} `additionalKeysP` myKeybindings
|
||||||
|
|
||||||
|
|
||||||
|
@ -236,3 +237,9 @@ myManageHook = composeAll
|
||||||
, className =? "Tk" --> doFloat -- python gui development
|
, className =? "Tk" --> doFloat -- python gui development
|
||||||
, className =? "TkFDialog" --> doFloat -- ^^
|
, className =? "TkFDialog" --> doFloat -- ^^
|
||||||
]
|
]
|
||||||
|
|
||||||
|
--
|
||||||
|
-- StartupHook
|
||||||
|
--
|
||||||
|
|
||||||
|
myStartupHook = pass >> checkKeymap myConfig myKeybindings
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue