X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Fspider.pl;h=28a91a12e50d045e8df2013426b8036c1f642538;hb=6ec22e78a4a344ce675645fabf18b2a1971f364a;hp=7bd3e6a646dfd1f492bc3a0a891ef449ecbd8049;hpb=2a43619b670b8f9249558f814b0183262c3ba4f6;p=spider.git diff --git a/cmd/set/spider.pl b/cmd/set/spider.pl index 7bd3e6a6..28a91a12 100644 --- a/cmd/set/spider.pl +++ b/cmd/set/spider.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; @@ -19,11 +19,19 @@ return (1, $self->msg('e5')) if $self->priv < 5; foreach $call (@args) { $call = uc $call; - my $chan = DXChannel->get($call); + if ($call eq $main::mycall) { + push @out, $self->msg('e11', $call); + next; + } + if ($call eq $main::myalias) { + push @out, $self->msg('e11', $call); + next; + } + my $chan = DXChannel::get($call); if ($chan) { push @out, $self->msg('nodee1', $call); } else { - $user = DXUser->get($call); + $user = DXUser::get($call); $create = !$user; $user = DXUser->new($call) if $create; if ($user) {