From 6c197a9f8ca39df42b4d5ada0cd17e6a4a1c7a9e Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Thu, 2 Jun 2016 02:45:00 +0200
Subject: typo

---
 ymir/mlmmj-expose.nix | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ymir/mlmmj-expose.nix b/ymir/mlmmj-expose.nix
index 07c7cdbb..34f5e6d6 100644
--- a/ymir/mlmmj-expose.nix
+++ b/ymir/mlmmj-expose.nix
@@ -67,7 +67,7 @@ let
                 identities <- (lines <$> readFile "exposed.ids") `catchIOError` (\e -> if isDoesNotExistError e then return [] else ioError e)
                 unless (ident `elem` identities) . die $ "Unknown sender: ‘" ++ ident ++ "’"
                 subscribers <- getSubscribers
-                for_ recipients (\recipient -> do {
+                forM_ recipients (\recipient -> do {
                   unless (recipient `elem` subscribers) . die $ "Unknown recipient: ‘" ++ recipient ++ "’";
                   encryptMsg CBC key (CLBS.pack . show $ (ident, recipient)) >>= putStrLn . (\ext -> takeDirectory listDir ++ "+" ++ ext ++ "@subs.lists.yggdrasil.li") . CBS.unpack . massage . Base64.encode . LBS.toStrict;
                 })
-- 
cgit v1.2.3