#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
my ($self, $line) = @_;
my @args = split /\s+/, $line;
my $user;
my $ref;
-if ($self->priv < 9 || $self->remotecmd) {
+if ($self->priv < 9 || $self->remotecmd || $self->inscript) {
Log('DXCommand', $self->call . " attempted to set privilege $priv for @args");
return (1, $self->msg('e5'));
}
foreach $call (@args) {
$call = uc $call;
- unless ($self->remotecmd) {
- if ($ref = DXChannel->get($call)) {
+ unless ($self->remotecmd || $self->inscript) {
+ if ($ref = DXChannel::get($call)) {
$ref->priv($priv);
$ref->user->priv($priv);
$ref->user->put();