smtps-gmail 1.3.0 → 1.3.1
raw patch · 4 files changed
+10/−12 lines, 4 filesdep −cprng-aesdep ~tlsPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependencies removed: cprng-aes
Dependency ranges changed: tls
API changes (from Hackage documentation)
- Network.Mail.Client.Gmail: instance Exception GmailException
- Network.Mail.Client.Gmail: instance Show GmailException
- Network.Mail.Client.Gmail: instance Typeable GmailException
+ Network.Mail.Client.Gmail: instance GHC.Exception.Exception Network.Mail.Client.Gmail.GmailException
+ Network.Mail.Client.Gmail: instance GHC.Show.Show Network.Mail.Client.Gmail.GmailException
Files
- LICENSE +1/−1
- Network/Mail/Client/Gmail.hs +1/−3
- README.org +5/−4
- smtps-gmail.cabal +3/−4
LICENSE view
@@ -1,4 +1,4 @@-Copyright (c) 2014, Enzo Haussecker. All rights reserved. +Copyright (c) 2014-2015, Enzo Haussecker. All rights reserved. Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
Network/Mail/Client/Gmail.hs view
@@ -21,12 +21,10 @@ ) where -import Control.Applicative ((<$>)) import Control.Monad (forever, forM) import Control.Monad.IO.Class (MonadIO(..)) import Control.Monad.Trans.Resource (ResourceT, runResourceT) import Control.Exception (Exception, bracket, throw)-import Crypto.Random.AESCtr (makeSystem) import Data.Attoparsec.ByteString.Char8 as P import Data.ByteString.Char8 as B (ByteString, pack) import Data.ByteString.Base64.Lazy (encode)@@ -90,7 +88,7 @@ recvSMTP hdl micros "250" sendSMTP hdl "STARTTLS" recvSMTP hdl micros "220"- let context = contextNew hdl params =<< makeSystem+ let context = contextNew hdl params bracket context cClose $ \ ctx -> do handshake ctx sendSMTPS ctx "EHLO"
README.org view
@@ -1,4 +1,5 @@-#+TITLE: Gmail SMTP Client+#+TITLE: Gmail-Specific SMTP Client+[[https://travis-ci.org/enzoh/smtps-gmail][https://api.travis-ci.org/enzoh/smtps-gmail.svg?branch=master]] [[https://hackage.haskell.org/package/smtps-gmail][https://img.shields.io/hackage/v/smtps-gmail.svg]] [[http://packdeps.haskellers.com/feed?needle=smtps-gmail][https://img.shields.io/hackage-deps/v/smtps-gmail.svg]] *** Introduction @@ -24,9 +25,9 @@ an Excel spreadsheet to Bob using the SMTP client. #+BEGIN_SRC haskell->>> :set -XOverloadedStrings->>> :module Network.Mail.Mime Network.Mail.Client.Gmail->>> sendGmail "alice" "password" (Address (Just "Alice") "alice@gmail.com") [Address (Just "Bob") "bob@example.com"] [] [] "Excel Spreadsheet" "Hi Bob,\n\nThe Excel spreadsheet is attached.\n\nRegards,\n\nAlice" ["Spreadsheet.xls"] 10000000+> :set -XOverloadedStrings+> :module Network.Mail.Mime Network.Mail.Client.Gmail+> sendGmail "alice" "password" (Address (Just "Alice") "alice@gmail.com") [Address (Just "Bob") "bob@example.com"] [] [] "Excel Spreadsheet" "Hi Bob,\n\nThe Excel spreadsheet is attached.\n\nRegards,\n\nAlice" ["Spreadsheet.xls"] 10000000 #+END_SRC ** Resources
smtps-gmail.cabal view
@@ -1,8 +1,8 @@ Name: smtps-gmail-Version: 1.3.0+Version: 1.3.1 License: BSD3 License-File: LICENSE-Copyright: Copyright (c) 2014, Enzo Haussecker. All rights reserved.+Copyright: Copyright (c) 2014-2015, Enzo Haussecker. All rights reserved. Author: Enzo Haussecker <ehaussecker@gmail.com> Maintainer: Enzo Haussecker <ehaussecker@gmail.com> Stability: Experimental@@ -23,7 +23,6 @@ bytestring, conduit, conduit-extra,- cprng-aes, data-default >= 0.5.3, filepath, mime-mail,@@ -32,4 +31,4 @@ stringsearch, transformers, text,- tls >= 1.2 && < 1.3+ tls >= 1.3 && < 1.4