3 # Useful for debugging. Make sure that the command runs in foreground
5 # Copyright (c) 1999 Dirk Koopman G1TLH
7 my ($self, $line) = @_;
9 my $mycall = $self->call;
12 if ($self->priv < 2) {
13 Log('DXCommand', "$mycall is trying to nospawn $line locally");
14 return (1, $self->msg('e5'));
16 if ($self->remotecmd || $self->inscript) {
17 Log('DXCommand', "$mycall is trying to nospawn remotely");
18 return (1, $self->msg('e5'));
21 Log('DXCommand', "nospawn '$line' by $mycall");
22 $self->{_nospawn} = 1;
23 my @out = $self->run_cmd($line);
24 delete $self->{_nospawn};