Merge pull request snoyberg#21 from foldr/master

Correctly order arguments of `mailFromToSubject`
k0ral · Mar 3, 2014 · 27e2d0d · 27e2d0d
2 parents 72c3d1f + 263a194
commit 27e2d0d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/mime-mail/Network/Mail/Mime.hs b/mime-mail/Network/Mail/Mime.hs
@@ -318,7 +318,7 @@ simpleMail' to from subject body = addPart [plainPart body]
                                  $ mailFromToSubject from to subject
 
 mailFromToSubject :: Address -> Address -> Text -> Mail
-mailFromToSubject to from subject =
+mailFromToSubject from to subject =
     (emptyMail from) { mailTo = [to]
                      , mailHeaders = [("Subject", subject)]
                      }