Merge pull request #59 from Mic92/master

mails: set List-Id
This commit is contained in:
rys ostrovid 2015-05-03 17:46:58 +02:00
commit 6c0d3ab821

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