CC: | bbb [...] cpan.org |
Subject: | Net::DNS::Nameserver - TCP outbuffer |
Calling Net::DNS::Nameserver->tcp_connection with undef instead of a
real socket causes undesired results. It's pretty obvious that robert
just made a typo. Attached is a patch to correct the problem.
Subject: | Net-DNS-0.66-outbuffer_tcp_connection.patch |
diff -wuir Net-DNS-0.66.ORIG/lib/Net/DNS/Nameserver.pm Net-DNS-0.66/lib/Net/DNS/Nameserver.pm
--- Net-DNS-0.66.ORIG/lib/Net/DNS/Nameserver.pm 2009-12-30 04:01:39.000000000 -0700
+++ Net-DNS-0.66/lib/Net/DNS/Nameserver.pm 2011-06-28 23:32:41.000000000 -0600
@@ -472,7 +472,7 @@
# send the response... well, unless it's a lot of tiny queries,
# in which case we will be generating an entire TCP packet per
# reply. --robert
- $self->tcp_connection($self->{"_tcp"}{"socket"});
+ $self->tcp_connection($self->{"_tcp"}{$s}{"socket"});
}
}
$self->{"_tcp"}{$s}{"timeout"} = time()+120;