module Model.Mail
  ( Mail(..)
  ) where

import           Data.Text (Text)

data Mail = Mail
  { from    :: Text
  , to      :: [Text]
  , subject :: Text
  , body    :: Text
  } deriving (Eq, Show)