module Mail.Hailgun
( sendEmail
, hailgunMessage
, addAttachment
, HailgunContext(..)
, HailgunMessage
, MessageSubject
, MessageContent(..)
, MessageRecipients(..)
, emptyMessageRecipients
, UnverifiedEmailAddress
, HailgunSendResponse(..)
, HailgunErrorMessage
, HailgunErrorResponse(..)
, getDomains
, Page(..)
, HailgunDomain(..)
, HailgunDomainResponse(..)
, HailgunTime(..)
, toProxy
, Attachment(..)
, AttachmentBody(..)
) where
import Mail.Hailgun.Attachment
import Mail.Hailgun.Domains
import Mail.Hailgun.Errors
import Mail.Hailgun.Internal.Data
import Mail.Hailgun.Message
import Mail.Hailgun.Pagination
import Mail.Hailgun.SendEmail
import qualified Data.ByteString.Char8 as BC
import Network.HTTP.Client (Proxy (..))
toProxy
:: String
-> Int
-> Proxy
toProxy host = Proxy (BC.pack host)