Index: vhLib/Mail.mac.rou
===================================================================
diff -u -r321 -r367
--- vhLib/Mail.mac.rou (.../Mail.mac.rou) (revision 321)
+++ vhLib/Mail.mac.rou (.../Mail.mac.rou) (revision 367)
@@ -66,6 +66,10 @@
Do MM.To.Insert(RedirectTo)
}
If $L(RecipientsInfo) {
+ If IsHTML {
+ Set RecipientsInfo=$$$Replace(RecipientsInfo,$$$CRLF,"
")
+ Set RecipientsInfo=RecipientsInfo_"
"
+ }
Do MM.TextData.Write(RecipientsInfo)
Do MM.TextData.WriteLine()
}
@@ -145,6 +149,7 @@
Set:($$$ListHasItems(MailMessage.To) ) RecipientsInfo=RecipientsInfo_" To : "_##class(TECH.ListUtils).ListToPieces(MailMessage.To,", ")_$$$CRLF
Set:($$$ListHasItems(MailMessage.Cc) ) RecipientsInfo=RecipientsInfo_" Cc : "_##class(TECH.ListUtils).ListToPieces(MailMessage.Cc,", ")_$$$CRLF
Set:($$$ListHasItems(MailMessage.Bcc)) RecipientsInfo=RecipientsInfo_" Bcc : "_##class(TECH.ListUtils).ListToPieces(MailMessage.Bcc,", ")_$$$CRLF
+ Set RecipientsInfo=RecipientsInfo_"==========================================================="_$$$CRLF
Quit RecipientsInfo
GeefMailAdresFromRuntimeContext()