mail-pool 2.0.1 → 2.1.0

raw patch · 2 files changed

+26/−15 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• mail-pool.cabal +2/−2
• src/Network/Mail/Pool.hs +24/−13

@@ -2,10 +2,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: cbd36a55a0bc6a23d7c34c05cc5192f66ef504d18668710b4a320e4da06a8dc8+-- hash: c299804a7b298ac656a71231f969d24b083053723638ab7fb7c3457cd1e7c73d  name:           mail-pool-version:        2.0.1+version:        2.1.0 synopsis:       Preconfigured email connection pool on top of smtp. description:    Email helper functions with some sane defaults such as a resource pool and cli support category:       Email

@@ -1,24 +1,32 @@ {-# LANGUAGE DeriveAnyClass #-}  module Network.Mail.Pool-  ( SmtpCred(..)-  , smtpHost-  , smtpLogin-  , smtpPassword-  , smtpPort-  , module X-  , emailOptions-  , sendEmail-  , smtpPool+  (++  -- * pool+    smtpPool+  , PoolSettings(..)   , defSettings+  , openTls+  , openPlain+  , openTls'+  -- * use pool+  , sendEmail+  -- * optparse+  , SmtpCred(..)+  , emailOptions+  -- * lenses   , poolCred   , poolConnf   , poolStripes   , poolUnused   , poolStripeMax-  , PoolSettings(..)-  , openTls-  , openPlain+  , smtpHost+  , smtpLogin+  , smtpPassword+  , smtpPort+ -- * re exports+  , module X   ) where  import           Control.Exception@@ -88,7 +96,10 @@ openPlain smtp = connectSMTPPort (smtp ^. smtpHost) (smtp ^. smtpPort)  openTls :: SmtpCred -> IO SMTPConnection-openTls smtp = connectSMTPSTARTTLSWithSettings (smtp ^. smtpHost) $ defaultSettingsSMTPSTARTTLS{+openTls = openTls' defaultSettingsSMTPSTARTTLS++openTls' :: Settings -> SmtpCred -> IO SMTPConnection+openTls' def smtp = connectSMTPSTARTTLSWithSettings (smtp ^. smtpHost) $ def {     sslPort = (smtp ^. smtpPort)   }