diff options
| -rw-r--r-- | ymir/mlmmj-expose.nix | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ymir/mlmmj-expose.nix b/ymir/mlmmj-expose.nix index ebcb89c2..d48bed18 100644 --- a/ymir/mlmmj-expose.nix +++ b/ymir/mlmmj-expose.nix | |||
| @@ -57,7 +57,7 @@ let | |||
| 57 | True -> putStrLn "Identity is already known" | 57 | True -> putStrLn "Identity is already known" |
| 58 | False -> writeFile "exosed.ids" . show $ ident : identities | 58 | False -> writeFile "exosed.ids" . show $ ident : identities |
| 59 | _ -> hPutStrLn stderr ("Called without expected arguments (<listDirectory> <senderIdentity>)") >> exitWith (ExitFailure 2) | 59 | _ -> hPutStrLn stderr ("Called without expected arguments (<listDirectory> <senderIdentity>)") >> exitWith (ExitFailure 2) |
| 60 | "mlmmj-get-exposed" -> do | 60 | "mlmmj-get-exposed" -> do |
| 61 | args <- getArgs | 61 | args <- getArgs |
| 62 | case args of | 62 | case args of |
| 63 | [listDir, (map toLower -> ident), (map toLower -> recipient)] -> do | 63 | [listDir, (map toLower -> ident), (map toLower -> recipient)] -> do |
