Item15162: fixed error parsing an empty header

foswiki · Aug 2, 2022 · 3a85c6a · 3a85c6a
1 parent 73a9b44
commit 3a85c6a
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/core/lib/Foswiki/Net.pm b/core/lib/Foswiki/Net.pm
@@ -659,9 +659,10 @@ sub _sendEmailByNetSMTP {
 
 # Remove names part from addresses. I.e. convert "John Smith <jsmith@nowhere.com>"
 # to just jsmith@nowhere.com
-        push @to,
-          map { $_->address }
-          Email::Address::XS->parse( $header->header_raw($field) );
+        my $str = $header->header_raw($field);
+        next unless $str;
+
+        push @to, map { $_->address } Email::Address::XS->parse($str);
     }
 
     if ( !( scalar(@to) ) ) {