[interchange] Support recipient addresses in CC and BCC when using Net::SMTP
Jon Jensen <[email protected]> Tue, 15 May 2018 04:22:48 +0000
| Newsgroups | gmane.comp.web.interchange.cvs |
|---|---|
| Message-ID | <[email protected]> |
commit 42452c0c6400fc6e08418c7c59011375400d48a1 Author: Andrew Baerg <[email protected]> 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