X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXXml%2FPing.pm;fp=perl%2FDXXml%2FPing.pm;h=04f830d1b534a8d701a32289a0b5d19c2db2ba29;hb=9f4c467f60ec71c0bbb2b27f91ca7d86a40b4597;hp=4fee5f75544ebbd227f4467e281a97c92f00e6aa;hpb=937b3f6592ae13be16dfe171b30817ee39d27bf0;p=spider.git diff --git a/perl/DXXml/Ping.pm b/perl/DXXml/Ping.pm index 4fee5f75..04f830d1 100644 --- a/perl/DXXml/Ping.pm +++ b/perl/DXXml/Ping.pm @@ -13,7 +13,6 @@ package DXXml::Ping; use DXDebug; use DXProt; use IsoTime; -use Investigate; use Time::HiRes qw(gettimeofday tv_interval); use vars qw(@ISA %pings); @@ -131,14 +130,10 @@ sub _handle_believe { my ($from, $via) = @_; - if (my $ivp = Investigate::get($from, $via)) { - $ivp->handle_ping; - } else { - my $user = DXUser->get_current($from); - if ($user) { - $user->set_believe($via); - $user->put; - } + my $user = DXUser->get_current($from); + if ($user) { + $user->set_believe($via); + $user->put; } } 1;