module Network.HaskellNet.POP3.SSL
    ( -- * Establishing connection
      connectPop3SSL
    , connectPop3SSLWithSettings
      -- * Settings
    , Settings(..)
    , defaultSettingsPop3SSL
      -- * Network.HaskellNet.POP3 re-exports
    , module Network.HaskellNet.POP3
    ) where

import Network.HaskellNet.POP3.Connection
import Network.HaskellNet.POP3
import Network.HaskellNet.SSL

import Network.HaskellNet.SSL.Internal

connectPop3SSL :: String -> IO POP3Connection
connectPop3SSL :: String -> IO POP3Connection
connectPop3SSL String
hostname = String -> Settings -> IO POP3Connection
connectPop3SSLWithSettings String
hostname Settings
defaultSettingsPop3SSL

connectPop3SSLWithSettings :: String -> Settings -> IO POP3Connection
connectPop3SSLWithSettings :: String -> Settings -> IO POP3Connection
connectPop3SSLWithSettings String
hostname Settings
cfg = String -> Settings -> IO BSStream
connectSSL String
hostname Settings
cfg IO BSStream -> (BSStream -> IO POP3Connection) -> IO POP3Connection
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= BSStream -> IO POP3Connection
connectStream

defaultSettingsPop3SSL :: Settings
defaultSettingsPop3SSL :: Settings
defaultSettingsPop3SSL = PortNumber -> Settings
defaultSettingsWithPort PortNumber
995