From 459b848d672fbf9f6b23e7111f03969ea180af62 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Thu, 2 Jun 2016 02:28:01 +0200 Subject: map --- ymir/mlmmj-expose.nix | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ymir/mlmmj-expose.nix b/ymir/mlmmj-expose.nix index 89bd566e..ba64283d 100644 --- a/ymir/mlmmj-expose.nix +++ b/ymir/mlmmj-expose.nix @@ -75,7 +75,7 @@ let getSubscribers :: IO [String] getSubscribers = map (map toLower) . concat <$> mapM (flip catchIOError (\e -> if isDoesNotExistError e then return [] else ioError e) . readDir) ["subscribers.d", "digesters.d"] where - readDir dir = concat <$> (mapM (fmap lines . readFile) . (dir ) =<< (getDirectoryContents dir)) + readDir dir = concat <$> (mapM (fmap lines . readFile) . map (dir ) =<< (getDirectoryContents dir)) ''; buildCommand = '' mkdir -p $out/bin -- cgit v1.2.3