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

import Data.Text (Text)
import qualified Data.Text.Lazy as LT

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