summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2016-06-02 02:30:23 +0200
committerGregor Kleen <gkleen@yggdrasil.li>2016-06-02 02:30:23 +0200
commit90035219714b770c810766630f561aa7ba5519b7 (patch)
treea8dcc6b07a44c91226dd5143c80589776aa2b817
parent9aa6cf4edb1da4e1bfbf326586e98b30bfc2d121 (diff)
downloadnixos-90035219714b770c810766630f561aa7ba5519b7.tar
nixos-90035219714b770c810766630f561aa7ba5519b7.tar.gz
nixos-90035219714b770c810766630f561aa7ba5519b7.tar.bz2
nixos-90035219714b770c810766630f561aa7ba5519b7.tar.xz
nixos-90035219714b770c810766630f561aa7ba5519b7.zip
no listDirectory
-rw-r--r--ymir/mlmmj-expose.nix2
1 files changed, 1 insertions, 1 deletions
diff --git a/ymir/mlmmj-expose.nix b/ymir/mlmmj-expose.nix
index 13f119c0..a69c6bb2 100644
--- a/ymir/mlmmj-expose.nix
+++ b/ymir/mlmmj-expose.nix
@@ -75,7 +75,7 @@ let
75 getSubscribers :: IO [String] 75 getSubscribers :: IO [String]
76 getSubscribers = map (map toLower) . concat <$> mapM (flip catchIOError (\e -> if isDoesNotExistError e then return [] else ioError e) . readDir) ["subscribers.d", "digesters.d"] 76 getSubscribers = map (map toLower) . concat <$> mapM (flip catchIOError (\e -> if isDoesNotExistError e then return [] else ioError e) . readDir) ["subscribers.d", "digesters.d"]
77 where 77 where
78 readDir dir = concat <$> (mapM (fmap lines . readFile) . map (dir </>) =<< (listDirectory dir)) 78 readDir dir = concat <$> (mapM (fmap lines . readFile) . map (dir </>) . filter (not . (`elem` [".", ".."]))=<< (getDirectoryContents dir))
79 ''; 79 '';
80 buildCommand = '' 80 buildCommand = ''
81 mkdir -p $out/bin 81 mkdir -p $out/bin