diff options
Diffstat (limited to 'src/server/Model/Mail.hs')
| -rw-r--r-- | src/server/Model/Mail.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/server/Model/Mail.hs b/src/server/Model/Mail.hs index 7ee8a8e..20addee 100644 --- a/src/server/Model/Mail.hs +++ b/src/server/Model/Mail.hs @@ -6,7 +6,8 @@ import Data.Text (Text) import qualified Data.Text.Lazy as LT data Mail = Mail - { to :: [Text] + { from :: Text + , to :: [Text] , subject :: Text , plainBody :: LT.Text , htmlBody :: LT.Text |