exception-mailer 0.4 → 0.4.1

raw patch · 2 files changed

+3/−3 lines, 2 filesdep ~text

Dependency ranges changed: text

Files

• System/ExceptionMailer.hs +1/−1
• exception-mailer.cabal +2/−2

@@ -69,7 +69,7 @@ mailError :: Address -> Address -> Maybe String -> String -> IO () mailError from to subj msg = do   prog <- getProgName-  let m = simpleMail' from to (fromString $ fromMaybe "Exception Mailer" subj)+  let m = simpleMail' to from (fromString $ fromMaybe "Exception Mailer" subj)                  (LT.concat ["Program: ", fromString $ prog ++ "\n"                             ,"Exception:\n", fromString msg])   renderSendMail m

@@ -1,5 +1,5 @@ name:                exception-mailer-version:             0.4+version:             0.4.1 synopsis:            Catch all runtime exceptions and send an email description:         This module is designed to be used in production code when                      no runtime exceptions are expected.  This module will catch any@@ -21,7 +21,7 @@   exposed-modules:     System.ExceptionMailer   ghc-options:         -W   build-depends:       base >=4 && < 5,-                       text,+                       text >= 0.11.3.0,                        mime-mail >= 0.4.4,                        hslogger