nek0/yammat
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

mails: set List-Id

Browse source
This commit is contained in:
Jörg Thalheim 2015-04-24 16:44:43 +02:00
parent f62f76a52b
commit 8e4602ca53
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Handler/Common.hs
View file

@ -101,7 +101,8 @@ sendMail to subject body =
, mailTo = [Address Nothing to] , mailTo = [Address Nothing to]
, mailCc = [] , mailCc = []
, mailBcc = [] , mailBcc = []
, mailHeaders = [("Subject", subject)] , mailHeaders = [("Subject", subject),
("List-Id", "\"Matemat\" <matemat@matemat.hq.c3d2.de>")]
, mailParts =[[Part , mailParts =[[Part
{ partType = "text/plain; charset=utf-8" { partType = "text/plain; charset=utf-8"
, partEncoding = None , partEncoding = None