Index: vhLib/Mail.mac.rou
===================================================================
diff -u -r351 -r379
--- vhLib/Mail.mac.rou (.../Mail.mac.rou) (revision 351)
+++ vhLib/Mail.mac.rou (.../Mail.mac.rou) (revision 379)
@@ -77,6 +77,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()
}
@@ -156,6 +160,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()