From: minima Date: Wed, 11 Jan 2006 22:03:53 +0000 (+0000) Subject: fix return pings X-Git-Tag: R_1_52~29 X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=d24f05ab0fb916b36d783894f1271a4609697e55 fix return pings --- diff --git a/perl/DXXml/Ping.pm b/perl/DXXml/Ping.pm index a9d72083..f2620e6b 100644 --- a/perl/DXXml/Ping.pm +++ b/perl/DXXml/Ping.pm @@ -37,6 +37,7 @@ sub handle_input oid=>$self->{id}, ot=>$self->{t} ); + $dxchan->send($rep->toxml); } else { handle_ping_reply($dxchan, $self->{o}, $self->{ot}, $self->{oid}); }