projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add #9000 as a default group and tidy up send_chats calls
[spider.git]
/
cmd
/
demonstrate.pl
diff --git
a/cmd/demonstrate.pl
b/cmd/demonstrate.pl
index 31426986291cd22f8c533cc0c2a211985350d68e..1d2231e8ed66c79ae8108fabdec5a8bfb6088d5a 100644
(file)
--- a/
cmd/demonstrate.pl
+++ b/
cmd/demonstrate.pl
@@
-11,10
+11,12
@@
my ($self, $line) = @_;
my ($call, $newline) = split /\s+/, $line, 2;
$call = uc $call;
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('e7', $call)) unless $dxchan;
-if ($self->remotecmd) {
+return (1, $self->msg('e31', $call)) unless $dxchan->is_user;
+if ($self->remotecmd || $self->inscript) {
Log('DXCommand', "$mycall is trying to 'demo' to $call remotely");
return (1, $self->msg('e5'));
}
Log('DXCommand', "$mycall is trying to 'demo' to $call remotely");
return (1, $self->msg('e5'));
}