summaryrefslogtreecommitdiff
path: root/ymir
diff options
context:
space:
mode:
Diffstat (limited to 'ymir')
-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 122fafa4..2bdcf619 100644
--- a/ymir/mlmmj-expose.nix
+++ b/ymir/mlmmj-expose.nix
@@ -69,7 +69,7 @@ let
69 "mlmmj-get-exposed" -> do 69 "mlmmj-get-exposed" -> do
70 args <- getArgs 70 args <- getArgs
71 case args of 71 case args of
72 [(dropTrailingPathSeperator -> listDir), (map toLower -> ident)] -> do 72 [(dropTrailingPathSeparator -> listDir), (map toLower -> ident)] -> do
73 setCurrentDirectory listDir 73 setCurrentDirectory listDir
74 identities <- getIdentities 74 identities <- getIdentities
75 unless (ident `elem` identities) . die $ "Unknown sender: ‘" ++ ident ++ "’" 75 unless (ident `elem` identities) . die $ "Unknown sender: ‘" ++ ident ++ "’"