diff options
| author | Mark Wells <mark@freeside.biz> | 2016-12-14 13:00:24 -0800 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2016-12-14 13:41:39 -0800 |
| commit | 5c59bb1d95ae3f0def9981a087f09ab0a687015b (patch) | |
| tree | 2470c7489dbd7dfc7673d8a06a709bd4b3cff8de /httemplate/view | |
| parent | 2e6c36147f13355a4f17afc1ff2a30642acf089e (diff) | |
fix parsing of multiple To: addresses, #73241
Diffstat (limited to 'httemplate/view')
| -rwxr-xr-x | httemplate/view/cust_msg.html | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/httemplate/view/cust_msg.html b/httemplate/view/cust_msg.html index 91a08ebda..d2b043c92 100755 --- a/httemplate/view/cust_msg.html +++ b/httemplate/view/cust_msg.html @@ -61,7 +61,9 @@ $custmsgnum =~ /^(\d+)$/ or die "illegal custmsgnum"; my $cust_msg = qsearchs('cust_msg', { 'custmsgnum' => $custmsgnum }); my $date = ''; $date = time2str('%Y-%m-%d %T', $cust_msg->_date) if ( $cust_msg->_date ); -my $env_to = join('</TD></TR><TR><TD></TD><TD>', split(',', $cust_msg->env_to)); +my @to = map { encode_entities($_->format) } + Email::Address->parse($cust_msg->env_to); +my $env_to = join('</TD></TR><TR><TD></TD><TD>', @to); my %label = ( 'sent' => 'Sent:', |