diff options
| author | Joris Guyonvarch | 2015-08-12 10:16:59 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-08-12 10:16:59 +0200 |
| commit | d985e879e574c770453590791bc35352c2632d01 (patch) | |
| tree | 15c4bb98b0f54e8557c6b4cbe527f5dd24cc0a9b /src/server/Model/Mail.hs | |
| parent | 892a7dd19a92fc18767984e624b8a5026dce61e4 (diff) | |
| download | budget-d985e879e574c770453590791bc35352c2632d01.tar.gz budget-d985e879e574c770453590791bc35352c2632d01.tar.bz2 budget-d985e879e574c770453590791bc35352c2632d01.zip | |
Translating sign in page and mail
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 |