Mailing List Archive

[interchange] Support recipient addresses in CC and BCC when using Net::SMTP
commit 42452c0c6400fc6e08418c7c59011375400d48a1
Author: Andrew Baerg <andrew@pullingshots.ca>
Date: Wed May 9 13:21:04 2018 -0600

Support recipient addresses in CC and BCC when using Net::SMTP

lib/Vend/Util.pm | 6 ++++++
1 files changed, 6 insertions(+), 0 deletions(-)
---
diff --git a/lib/Vend/Util.pm b/lib/Vend/Util.pm
index d3ea439..96b3818 100644
--- a/lib/Vend/Util.pm
+++ b/lib/Vend/Util.pm
@@ -2262,6 +2262,12 @@ sub send_mail {

my @to;
my @addr = split /\s*,\s*/, $to;
+ for(@extra_headers) {
+ s/\s*$/\n/;
+ next unless /^(Cc|Bcc):\s*(\S.+)$/mi;
+#::logDebug("smtp adding receipients for $1=$2");
+ push @addr, split(/\s*,\s*/, $2);
+ }
for (@addr) {
if(/\s/) {
## Uh-oh. Try to handle

_______________________________________________
interchange-cvs mailing list
interchange-cvs@icdevgroup.org
http://www.icdevgroup.org/mailman/listinfo/interchange-cvs