mirror of
git://scm.dxcluster.org/scm/spider
synced 2024-09-21 07:47:10 +00:00
normalise peerhost on outgoing connects
This commit is contained in:
parent
a60f14f41c
commit
0702d383db
@ -141,7 +141,7 @@ sub connect {
|
||||
|
||||
connect => [$to_host, $to_port],
|
||||
|
||||
# on_connect => sub {my $h = shift; $conn->{peerhost} = $h->handle->peername;},
|
||||
on_connect => sub {my $h = shift; $conn->{peerhost} = shift;},
|
||||
|
||||
on_eof => sub {$conn->disconnect},
|
||||
|
||||
|
@ -11,7 +11,7 @@ use vars qw($version $subversion $build $gitversion);
|
||||
|
||||
$version = '1.56';
|
||||
$subversion = '0';
|
||||
$build = '6';
|
||||
$gitversion = '7f629e3';
|
||||
$build = '7';
|
||||
$gitversion = 'a60f14f';
|
||||
|
||||
1;
|
||||
|
Loading…
Reference in New Issue
Block a user