mpo
/
xmonad-config
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Expand ~ manually

This commit is contained in:
Martin Potier 2023-06-21 12:21:59 +03:00
parent f8bd90fb48
commit 90d4dbb58e
No known key found for this signature in database
GPG Key ID: D4DD957DBA4AD89E
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/ScreenEvents.hs
View File

@ -8,7 +8,7 @@ import Graphics.X11.Xlib.Extras (Event(RRScreenChangeNotifyEvent))
screenChangeHandler :: Event -> X All
screenChangeHandler (RRScreenChangeNotifyEvent _ _ _ _ _ _ _ _ _ _ _ _ _ _ _) =
spawn "~/.fehbg" >> return (All True)
spawn "/home/e/.fehbg" >> return (All True)
screenChangeHandler _ = return (All True)
modify :: XConfig l -> XConfig l

2
xmonad.hs
View File

@ -74,7 +74,7 @@ withConfig =
$ desktopConfig -- on a default desktop config
{ manageHook = myManageHook <+> manageHook desktopConfig
, layoutHook = desktopLayoutModifiers layouts
, startupHook = spawnOnce "sh ~/.fehbg"
, startupHook = spawnOnce "sh /home/e/.fehbg"
, terminal = "nvidia-offload kitty"
, normalBorderColor = S.base03
, focusedBorderColor = S.green