added inscript test to selected commands

[spider.git] / cmd / wx.pl

diff --git a/cmd/wx.pl b/cmd/wx.pl
index 17aef89efb772ef05a718a347697b63e9553adee..22b5e0ccc262075b1908d6802837a766c520464d 100644 (file)
--- a/cmd/wx.pl
+++ b/cmd/wx.pl
@@ -23,7 +23,7 @@ my $from = $self->call;
 my $t = ztime(time);
 my $tonode;
 my $sysopflag;
-return (1, $self->msg('e5')) if $self->remotecmd;
+return (1, $self->msg('e5')) if $self->remotecmd || $self->inscript;
 return (1, $self->msg('e28')) unless $self->registered;
 
 if ($sort eq "FULL") {