module Network.HaskellNet.POP3.Connection
    ( POP3Connection
    , stream
    , newConnection
    , apopKey
    )
where

import Network.HaskellNet.BSStream

data POP3Connection =
    POP3C { POP3Connection -> BSStream
stream :: !BSStream
          , POP3Connection -> String
apopKey :: !String -- ^ APOP key
          }

newConnection :: BSStream -> String -> POP3Connection
newConnection :: BSStream -> String -> POP3Connection
newConnection = BSStream -> String -> POP3Connection
POP3C