Merge pull request #1 from jokey2k/patch-1

Fix for Net::DNS break
This commit is contained in:
Matt Simerson 2013-03-10 20:13:00 -07:00
commit 1a9c074f84

View File

@ -278,12 +278,6 @@ while (1) {
} }
# otherwise child # otherwise child
# all children should have different seeds, to prevent conflicts
srand();
for (0 .. rand(65536)) {
Net::DNS::Header::nextid();
}
close $_ for $select->handles; close $_ for $select->handles;
$SIG{$_} = 'DEFAULT' for keys %SIG; $SIG{$_} = 'DEFAULT' for keys %SIG;