From 90d4dbb58efbb95e79acbda310a3b211c2e62c10 Mon Sep 17 00:00:00 2001
From: Martin Potier <martin.potier@marvid.fr>
Date: Wed, 21 Jun 2023 12:21:59 +0300
Subject: [PATCH] Expand ~ manually

---
 lib/ScreenEvents.hs | 2 +-
 xmonad.hs           | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/ScreenEvents.hs b/lib/ScreenEvents.hs
index 0de53d3..b4aa98e 100644
--- a/lib/ScreenEvents.hs
+++ b/lib/ScreenEvents.hs
@@ -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
diff --git a/xmonad.hs b/xmonad.hs
index b3a01e1..414d515 100755
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -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