You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by fe...@apache.org on 2006/05/24 19:13:13 UTC

svn commit: r409209 - /spamassassin/branches/3.1/lib/Mail/SpamAssassin/DnsResolver.pm

Author: felicity
Date: Wed May 24 10:13:13 2006
New Revision: 409209

URL: http://svn.apache.org/viewvc?rev=409209&view=rev
Log:
bug 4901: deal more properly with failures in bgsend().  also, use the proper variable to show when errors occur.

Modified:
    spamassassin/branches/3.1/lib/Mail/SpamAssassin/DnsResolver.pm

Modified: spamassassin/branches/3.1/lib/Mail/SpamAssassin/DnsResolver.pm
URL: http://svn.apache.org/viewvc/spamassassin/branches/3.1/lib/Mail/SpamAssassin/DnsResolver.pm?rev=409209&r1=409208&r2=409209&view=diff
==============================================================================
--- spamassassin/branches/3.1/lib/Mail/SpamAssassin/DnsResolver.pm (original)
+++ spamassassin/branches/3.1/lib/Mail/SpamAssassin/DnsResolver.pm Wed May 24 10:13:13 2006
@@ -334,10 +334,9 @@
 
   my $pkt = $self->new_dns_packet($host, $type, $class);
 
-  my $data = $pkt->data;
   $self->connect_sock_if_reqd();
-  if (!$self->{sock}->send ($pkt->data, 0)) {
-    warn "dns: sendto() failed: $@";
+  if (!defined($self->{sock}->send($pkt->data, 0))) {
+    warn "dns: sendto() failed: $!";
     return;
   }
   my $id = $self->_packet_id($pkt);