https://bz.apache.org/SpamAssassin/show_bug.cgi?id=7196
Kevin A. McGrail <kmcgr...@pccc.com> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |kmcgr...@pccc.com
--- Comment #1 from Kevin A. McGrail <kmcgr...@pccc.com> ---
Mark,
Is this patch what you mean or is my checking for defined sweeping something
bigger under the table?
Index: lib/Mail/SpamAssassin/PerMsgStatus.pm
===================================================================
--- lib/Mail/SpamAssassin/PerMsgStatus.pm (revision 1679280)
+++ lib/Mail/SpamAssassin/PerMsgStatus.pm (working copy)
@@ -3078,12 +3078,17 @@
dbg("eval: all '*From' addrs domains (before): " . join(" ", @addrs));
#loop through and limit to just the domain with a dummy address
+ my @tmp_addrs;
for (my $i = 0; $i < scalar(@addrs); $i++) {
- $addrs[$i] =
'dummy@'.$self->{main}->{registryboundaries}->uri_to_domain($addrs[$i]);
+ #Checking if the return from uri_to_domain is defined - bug 7196 KAM
+ my $tmp_addrs =
$self->{main}->{registryboundaries}->uri_to_domain($addrs[$i]);
+ if (defined $tmp_addrs) {
+ push (@tmp_addrs, 'dummy@'.$tmp_addrs);
+ }
}
#Remove duplicate domains
- my %addrs = map { $_ => 1 } @addrs;
+ my %addrs = map { $_ => 1 } @tmp_addrs;
@addrs = keys %addrs;
dbg("eval: all '*From' addrs domains (after uri to domain): " . join(" ",
@addrs));
--
You are receiving this mail because:
You are the assignee for the bug.
