You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by mm...@apache.org on 2012/12/12 19:38:26 UTC
svn commit: r1420906 -
/spamassassin/trunk/lib/Mail/SpamAssassin/DnsResolver.pm
Author: mmartinec
Date: Wed Dec 12 18:38:25 2012
New Revision: 1420906
URL: http://svn.apache.org/viewvc?rev=1420906&view=rev
Log:
Bug 6872, one more
Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/DnsResolver.pm
Modified: spamassassin/trunk/lib/Mail/SpamAssassin/DnsResolver.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/DnsResolver.pm?rev=1420906&r1=1420905&r2=1420906&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/DnsResolver.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/DnsResolver.pm Wed Dec 12 18:38:25 2012
@@ -743,15 +743,15 @@ sub poll_responses {
# NOERROR, may or may not have answer records
dbg("dns: dns response %s is OK, %d answer records",
$packet_id, $header->ancount);
- my $id = $self->_packet_id($packet);
- my $cb = delete $self->{id_to_callback}->{$id};
- if (!$cb) {
- info("dns: no callback for id %s, ignored; packet: %s",
- $id, $packet ? $packet->string : "undef" );
- } else {
- $cb->($packet, $id, $now);
- $cnt++;
- }
+ }
+ my $id = $self->_packet_id($packet);
+ my $cb = delete $self->{id_to_callback}->{$id};
+ if (!$cb) {
+ info("dns: no callback for id %s, ignored; packet: %s",
+ $id, $packet ? $packet->string : "undef" );
+ } else {
+ $cb->($packet, $id, $now);
+ $cnt++;
}
}
}