From: minima Date: Wed, 11 Jan 2006 22:03:53 +0000 (+0000) Subject: fix return pings X-Git-Tag: 1.54~156 X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=395ac7aa91f571981cf20d5434ce3b13e1b65bcf 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}); }