X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Fisolate.pl;h=90de6683165cdde1bace1fe8d4f4bd0bfbefcf9d;hb=16d19a14ff3c7622cb81ab0312d674fde6b2af83;hp=7049ce92a449e0962825390dce7a81f2d7b136e1;hpb=a453254d687774f352822492d500330a09fd7ebe;p=spider.git diff --git a/cmd/set/isolate.pl b/cmd/set/isolate.pl index 7049ce92..90de6683 100644 --- a/cmd/set/isolate.pl +++ b/cmd/set/isolate.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; @@ -19,17 +19,23 @@ return (1, $self->msg('e5')) if $self->priv < 9; foreach $call (@args) { $call = uc $call; - my $chan = DXChannel->get($call); + my $chan = DXChannel::get($call); if ($chan) { push @out, $self->msg('nodee1', $call); } else { $user = DXUser->get($call); $create = !$user; $user = DXUser->new($call) if $create; + my $f; + push(@out, $self->msg('isoari', $call)), $f++ if Filter::getfn('route', $call, 1); + push(@out, $self->msg('isoaro', $call)), $f++ if Filter::getfn('route', $call, 0); if ($user) { - $user->isolate(1); - $user->close(); - push @out, $self->msg($create ? 'isoc' : 'iso', $call); + unless ($f) { + $user->isolate(1); + $user->close(); + push @out, $self->msg($create ? 'isoc' : 'iso', $call); + Log('DXCommand', $self->msg($create ? 'isoc' : 'iso', $call)); + } } else { push @out, $self->msg('e3', "Set/Isolate", $call); }