read instance

1 files changed, 3 insertions, 1 deletions

diff --git a/custom/notify-user.nix b/custom/notify-user.nix
index c2ad3472..e9e98ddc 100644
--- a/custom/notify-user.nix
+++ b/custom/notify-user.nix
@@ -7,7 +7,7 @@
 stdenv.mkDerivation {
   name = ''notify-${user}'';
   src = writeTextFile { name = ''notify-${user}.hs''; text = ''
-    {-# LANGUAGE ViewPatterns #-}
+    {-# LANGUAGE ViewPatterns, StandaloneDeriving #-}
   
     import System.FilePath.Glob (glob)
     import System.Environment (setEnv, getArgs)
@@ -29,6 +29,8 @@ stdenv.mkDerivation {
     import Data.Maybe
     import Text.Read (readMaybe)
 
+    deriving instance Read Notify.Urgency
+
     main = do
       envFiles <- glob "/home/${user}/.dbus/session-bus/*"
       forM_ envFiles $ \envFile -> do