X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fping.pl;h=32efda31aabf0c8b7baa48ca9ef575b2015ecb3a;hb=c1540ccd7990ec4bd151604dd63583d19fe4d0f6;hp=9447b67b6f055e652da0fd1d39161aa10dba0015;hpb=aedd7de39e1fd743e05ff2fb9fb286a616bb50b3;p=spider.git diff --git a/cmd/ping.pl b/cmd/ping.pl index 9447b67b..32efda31 100644 --- a/cmd/ping.pl +++ b/cmd/ping.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; @@ -20,13 +20,12 @@ return (1, $self->msg('e6')) if !$call; return (1, $self->msg('pinge1')) if $call eq $main::mycall; # can we see it? Is it a node? -my $noderef = DXCluster->get_exact($call); -$noderef = DXChannel->get($call) unless $noderef; +my $noderef = Route::Node::get($call); -return (1, $self->msg('e7', $call)) if !$noderef || !$noderef->pcversion; +return (1, $self->msg('e7', $call)) unless $noderef; # ping it -DXProt::addping($self->call, $call); +DXXml::Ping::add($self, $call); return (1, $self->msg('pingo', $call));