X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdemonstrate.pl;h=1d2231e8ed66c79ae8108fabdec5a8bfb6088d5a;hb=112baf5b4c3dd1f4897a15f2414befab7d83b309;hp=53437b966dd5317517b8dc62bb697a00eee58457;hpb=a10bb3f88ba73704734a47f6093e86277a581ea0;p=spider.git diff --git a/cmd/demonstrate.pl b/cmd/demonstrate.pl index 53437b96..1d2231e8 100644 --- a/cmd/demonstrate.pl +++ b/cmd/demonstrate.pl @@ -11,12 +11,12 @@ my ($self, $line) = @_; my ($call, $newline) = split /\s+/, $line, 2; $call = uc $call; -my $dxchan = DXChannel->get($call); +my $dxchan = DXChannel::get($call); my $mycall = $self->call; return (1, $self->msg('e7', $call)) unless $dxchan; return (1, $self->msg('e31', $call)) unless $dxchan->is_user; -if ($self->remotecmd) { +if ($self->remotecmd || $self->inscript) { Log('DXCommand', "$mycall is trying to 'demo' to $call remotely"); return (1, $self->msg('e5')); }