diff options
| author | Gregor Kleen <pngwjpgh@users.noreply.github.com> | 2016-12-12 15:27:43 +0100 |
|---|---|---|
| committer | Gregor Kleen <pngwjpgh@users.noreply.github.com> | 2016-12-12 15:27:43 +0100 |
| commit | 5fab29b4ffc801eba2d8747fa51bb82f102a5e14 (patch) | |
| tree | 886bd6530f7f954e2b40427532f9c9ba4fb085d0 /ymir/mlmmj-expose.hs | |
| parent | 531b41944a1bef7d95f94bc267698b5db6777305 (diff) | |
| download | nixos-5fab29b4ffc801eba2d8747fa51bb82f102a5e14.tar nixos-5fab29b4ffc801eba2d8747fa51bb82f102a5e14.tar.gz nixos-5fab29b4ffc801eba2d8747fa51bb82f102a5e14.tar.bz2 nixos-5fab29b4ffc801eba2d8747fa51bb82f102a5e14.tar.xz nixos-5fab29b4ffc801eba2d8747fa51bb82f102a5e14.zip | |
fix indentation
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 ef8d076b..73e329d8 100644 --- a/ymir/mlmmj-expose.hs +++ b/ymir/mlmmj-expose.hs | |||
| @@ -123,7 +123,7 @@ main = do | |||
| 123 | case ident `elem` identities of | 123 | case ident `elem` identities of |
| 124 | True -> putStrLn "Identity is already known" | 124 | True -> putStrLn "Identity is already known" |
| 125 | False -> writeFile "exposed.ids" . unlines $ ident : identities | 125 | False -> writeFile "exposed.ids" . unlines $ ident : identities |
| 126 | _ -> hPutStrLn stderr ("Called without expected arguments (<listDirectory> <senderIdentity>)") >> exitWith (ExitFailure 2) | 126 | _ -> hPutStrLn stderr ("Called without expected arguments (<listDirectory> <senderIdentity>)") >> exitWith (ExitFailure 2) |
| 127 | "mlmmj-get-exposed" -> do | 127 | "mlmmj-get-exposed" -> do |
| 128 | args <- getArgs | 128 | args <- getArgs |
| 129 | case args of | 129 | case args of |