X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2FDXXml%2FPing.pm;h=270587198928773eba4b9e1dd72f722aa593a324;hp=29d7ab1c6a89ac7b1d99f92a7b627b6fcf82bed8;hb=ab811a0c902225075a9bd69749f65594079433a9;hpb=8182fba8e33d568b834621cc35c1ca7c74fb5487 diff --git a/perl/DXXml/Ping.pm b/perl/DXXml/Ping.pm index 29d7ab1c..27058719 100644 --- a/perl/DXXml/Ping.pm +++ b/perl/DXXml/Ping.pm @@ -68,7 +68,7 @@ sub add push @$ref, $self; $pings{$to} = $ref; - my $u = DXUser->get_current($to); + my $u = DXUser::get_current($to); if ($u) { $u->lastping(($via || $from), $main::systime); $u->put; @@ -137,7 +137,7 @@ sub _handle_believe { my ($from, $via) = @_; - my $user = DXUser->get_current($from); + my $user = DXUser::get_current($from); if ($user) { $user->set_believe($via); $user->put;