X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=cb49f7980b39d2daadc002f044fba35619917e2a;hb=407d9a80a8af1fa6c1ae2c8fbca833e49da6e816;hp=71cef0e220d81071f5ddf931973020cb301a1b49;hpb=a8dfe65f270217c237386afb696a52c1a15f5ad1;p=spider.git diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 71cef0e2..cb49f798 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -256,6 +256,7 @@ sub start # set unbuffered and no echo $self->send_now('B',"0"); $self->send_now('E',"0"); + $self->conn->echo(0) if $self->conn->can('echo'); # ping neighbour node stuff my $ping = $user->pingint;