Mailing List Archive

svn commit: r484706 - /spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Author: felicity
Date: Fri Dec 8 11:30:19 2006
New Revision: 484706

URL: http://svn.apache.org/viewvc?view=rev&rev=484706
Log:
look at both domainkey-signature and dkim-signature...

Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm?view=diff&rev=484706&r1=484705&r2=484706
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm Fri Dec 8 11:30:19 2006
@@ -1748,11 +1748,12 @@
my %parsed = map { $_ => 'parsed' } $self->_get_parsed_uri_list();

# Look for the domain in DK/DKIM headers
- my $dk = $self->get('DomainKey-Signature');
- if ($dk =~ /\bd\s*=\s*([^;]+)/) {
- my $dom = $1;
- $dom =~ s/\s+//g;
- $parsed{$dom} = 'domainkeys';
+ foreach my $dk ( $self->get('DomainKey-Signature'), $self->get('DKIM-Signature') ) {
+ if ($dk =~ /\bd\s*=\s*([^;]+)/) {
+ my $dom = $1;
+ $dom =~ s/\s+//g;
+ $parsed{$dom} = 'domainkeys';
+ }
}

# get URIs from HTML parsing