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

Merge pull request #59 from Mic92/master

Browse source 
mails: set List-Id
This commit is contained in:
rys ostrovid 2015-05-03 17:46:58 +02:00
commit 6c0d3ab821
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