Use full mail for from
This commit is contained in:
parent
5fd3882e04
commit
fc279ce4be
|
@ -208,7 +208,7 @@ sendMail :: MonadIO m => Text -> Text -> TL.Text -> m ()
|
||||||
sendMail to subject body =
|
sendMail to subject body =
|
||||||
liftIO $ renderSendMail
|
liftIO $ renderSendMail
|
||||||
Mail
|
Mail
|
||||||
{ mailFrom = Address Nothing "noreply"
|
{ mailFrom = Address Nothing "noreply@c3d2.de"
|
||||||
, mailTo = [Address Nothing to]
|
, mailTo = [Address Nothing to]
|
||||||
, mailCc = []
|
, mailCc = []
|
||||||
, mailBcc = []
|
, mailBcc = []
|
||||||
|
|
Loading…
Reference in New Issue