diff options
Diffstat (limited to 'ymir/mlmmj-expose.hs')
| -rw-r--r-- | ymir/mlmmj-expose.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ymir/mlmmj-expose.hs b/ymir/mlmmj-expose.hs index 169fbb42..f074659b 100644 --- a/ymir/mlmmj-expose.hs +++ b/ymir/mlmmj-expose.hs | |||
| @@ -109,7 +109,7 @@ main = do | |||
| 109 | uuidTrans' (x:xs) = x : uuidTrans' xs | 109 | uuidTrans' (x:xs) = x : uuidTrans' xs |
| 110 | getContents >>= writeFile fName | 110 | getContents >>= writeFile fName |
| 111 | hPrintf stdout "Forwarding mail to <%s>, subscribed to %s\n" recipient (takeBaseName listDir) | 111 | hPrintf stdout "Forwarding mail to <%s>, subscribed to %s\n" recipient (takeBaseName listDir) |
| 112 | callProcess "${pkgs.mlmmj}/bin/mlmmj-send" ["-L", listDir, "-l", "6", "-m", fName, "-T", recipient] | 112 | callProcess "@mlmmj@/bin/mlmmj-send" ["-L", listDir, "-l", "6", "-m", fName, "-T", recipient] |
| 113 | removeFile fName | 113 | removeFile fName |
| 114 | [] -> die "Unknown extension" | 114 | [] -> die "Unknown extension" |
| 115 | _ -> die "Ambiguous extension" | 115 | _ -> die "Ambiguous extension" |