...

1 files changed, 2 insertions, 2 deletions

diff --git a/custom/notify-user.hs b/custom/notify-user.hs
index f9cc2369..264d6f86 100644
--- a/custom/notify-user.hs
+++ b/custom/notify-user.hs
@@ -24,7 +24,7 @@ deriving instance Read Notify.Urgency
 
 main :: IO ()
 main = do
-  envFiles <- glob "@userHome@/.dbus/session-bus/*"
+  envFiles <- glob "@home@/.dbus/session-bus/*"
   forM_ envFiles $ \envFile -> do
     sessionAddr <- unQuote . tail . snd . break (== '=') . head . filter ("DBUS_SESSION_BUS_ADDRESS=" `isPrefixOf`) . lines <$> readFile envFile
     setEnv "DBUS_SESSION_BUS_ADDRESS" sessionAddr
@@ -37,7 +37,7 @@ main = do
                                           ]
         let
           urgency = fromMaybe Notify.Normal $ readMaybe . caseForRead =<< Map.lookup "urgency" opts
-          appName = fromMaybe "notify-@userName@" $ Map.lookup "app-name" opts
+          appName = fromMaybe "notify-@user@" $ Map.lookup "app-name" opts
           category = fromMaybe "" $ Map.lookup "category" opts
         Notify.display_ $ Notify.summary summary <> Notify.body contents <> Notify.appName appName <> Notify.urgency urgency <> Notify.category category
       _ -> exitWith $ ExitFailure 2