diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,3 +1,7 @@
+## 0.4.1
+
+* Add 'renderSendMailSESGlobal' and 'sendMailSESGlobal' function which uses the global manager.
+
 ## 0.4.0.0
 
 * Support IAM temp credentials. This is a backwards-incompatible change that adds
diff --git a/Network/Mail/Mime/SES.hs b/Network/Mail/Mime/SES.hs
--- a/Network/Mail/Mime/SES.hs
+++ b/Network/Mail/Mime/SES.hs
@@ -3,7 +3,9 @@
 {-# LANGUAGE CPP #-}
 module Network.Mail.Mime.SES
     ( sendMailSES
+    , sendMailSESGlobal
     , renderSendMailSES
+    , renderSendMailSESGlobal
     , SES (..)
     , usEast1
     , usWest2
@@ -39,6 +41,7 @@
                                               withResponse)
 import           Network.HTTP.Client.Conduit (bodyReaderSource)
 import           Network.HTTP.Types          (Status)
+import           Network.HTTP.Client.TLS     (getGlobalManager)
 import           Network.Mail.Mime           (Mail, renderMail')
 import           Text.XML.Stream.Parse       (def, parseBytes)
 
@@ -61,7 +64,20 @@
 renderSendMailSES :: MonadIO m => Manager -> SES -> Mail -> m ()
 renderSendMailSES m ses mail = liftIO (renderMail' mail) >>= sendMailSES m ses
 
-sendMailSES :: MonadIO m => Manager -> SES -> L.ByteString -> m ()
+-- | @since 0.4.1
+-- Same as 'renderSendMailSES' but uses the global 'Manager'.
+renderSendMailSESGlobal :: MonadIO m => SES -> Mail -> m ()
+renderSendMailSESGlobal ses mail = do
+  mgr <- liftIO getGlobalManager
+  renderSendMailSES mgr ses mail
+
+sendMailSES :: MonadIO m => Manager -> SES 
+            -> L.ByteString -- ^ Raw message data. You must ensure that
+                            -- the message format complies with
+                            -- Internet email standards regarding
+                            -- email header fields, MIME types, and
+                            -- MIME encoding.
+            -> m ()
 sendMailSES manager ses msg = liftIO $ do
     now <- getCurrentTime
     let date = S8.pack $ format now
@@ -85,7 +101,6 @@
                 ] ++ case sesSessionToken ses of
                     Just token -> [("X-Amz-Security-Token", token)]
                     Nothing    -> []
-
 #if !MIN_VERSION_http_client(0, 5, 0)
             , checkStatus = \_ _ _ -> Nothing
 #endif
@@ -102,6 +117,19 @@
         : zipWith mkDest [1 :: Int ..] (sesTo ses)
     mkDest num addr = (S8.pack $ "Destinations.member." ++ show num, addr)
     format = formatTime defaultTimeLocale "%a, %e %b %Y %H:%M:%S %z"
+
+-- | @since 0.4.1
+-- Same as 'sendMailSES' but uses the global 'Manager'.
+sendMailSESGlobal :: MonadIO m => SES 
+                  -> L.ByteString -- ^ Raw message data. You must ensure that
+                                  -- the message format complies with
+                                  -- Internet email standards regarding
+                                  -- email header fields, MIME types, and
+                                  -- MIME encoding.
+                  -> m ()
+sendMailSESGlobal ses msg = do
+  mgr <- liftIO getGlobalManager
+  sendMailSES mgr ses msg
 
 checkForError :: Status -> Sink Event IO ()
 checkForError status = do
diff --git a/mime-mail-ses.cabal b/mime-mail-ses.cabal
--- a/mime-mail-ses.cabal
+++ b/mime-mail-ses.cabal
@@ -1,5 +1,5 @@
 Name:                mime-mail-ses
-Version:             0.4.0.0
+Version:             0.4.1
 Synopsis:            Send mime-mail messages via Amazon SES
 description:         Hackage documentation generation is not reliable. For up to date documentation, please see: <http://www.stackage.org/package/mime-mail-ses>.
 Homepage:            http://github.com/snoyberg/mime-mail
@@ -15,12 +15,13 @@
 
 Library
   Exposed-modules:     Network.Mail.Mime.SES
-  Build-depends:       base               >= 4.6       && < 5
+  Build-depends:       base               >= 4.9       && < 5
                      , base64-bytestring  >= 0.1
                      , bytestring         >= 0.9
                      , time               >= 1.1
                      , old-locale
                      , http-client        >= 0.2.2.2
+                     , http-client-tls    >= 0.2.4
                      , http-conduit       >= 2.1
                      , mime-mail          >= 0.3
                      , transformers       >= 0.2
