From 1166d1a3fc0311a5079256debfb51822d76a045c Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Sun, 2 Oct 2016 16:53:46 +0200 Subject: read instance --- custom/notify-user.nix | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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 -- cgit v1.2.3