summaryrefslogtreecommitdiff
path: root/ymir/mlmmj-expose.nix
diff options
context:
space:
mode:
authorGregor Kleen <pngwjpgh@users.noreply.github.com>2016-11-10 12:22:37 +0100
committerGregor Kleen <pngwjpgh@users.noreply.github.com>2016-11-10 12:22:37 +0100
commit2be833ca09625faa97803c9e6920b0e6e97605be (patch)
tree4481fe8ca28fae8c0c5ac818b7305581680ffd45 /ymir/mlmmj-expose.nix
parentbdc3fc7be5e7c8d79001d419d1a587e4a3280bed (diff)
downloadnixos-2be833ca09625faa97803c9e6920b0e6e97605be.tar
nixos-2be833ca09625faa97803c9e6920b0e6e97605be.tar.gz
nixos-2be833ca09625faa97803c9e6920b0e6e97605be.tar.bz2
nixos-2be833ca09625faa97803c9e6920b0e6e97605be.tar.xz
nixos-2be833ca09625faa97803c9e6920b0e6e97605be.zip
just strip separators
Diffstat (limited to 'ymir/mlmmj-expose.nix')
-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 b8a13cc4..0873b0f7 100644
--- a/ymir/mlmmj-expose.nix
+++ b/ymir/mlmmj-expose.nix
@@ -47,7 +47,7 @@ let
47 uuidTrans = uuidTrans' . UUID.toString 47 uuidTrans = uuidTrans' . UUID.toString
48 where 48 where
49 uuidTrans' [] = [] 49 uuidTrans' [] = []
50 uuidTrans' ('-':xs) = '.' : uuidTrans' xs 50 uuidTrans' ('-':xs) = uuidTrans' xs
51 uuidTrans' (x:xs) = x : uuidTrans' xs 51 uuidTrans' (x:xs) = x : uuidTrans' xs
52 getContents >>= writeFile fName 52 getContents >>= writeFile fName
53 hPrintf stdout "Forwarding mail to <%s>, subscribed to %s\n" recipient (takeBaseName listDir) 53 hPrintf stdout "Forwarding mail to <%s>, subscribed to %s\n" recipient (takeBaseName listDir)