X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=cb49f7980b39d2daadc002f044fba35619917e2a;hb=21ee7b1845f8fc5ab10c6a33a058cfbd11d7a705;hp=71cef0e220d81071f5ddf931973020cb301a1b49;hpb=f52bf428cfd46825c2e2fcd3a0ba55097bbe7bd6;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;