X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fexport.pl;h=fc1ebfd5dc3a405166f295a25d4725efb4f52af0;hb=217d9d54b6772ed24aee88d5dc968a64de54f531;hp=0e803a2fa8c8010d08468e8588b0e8fd9828d029;hpb=ba0bc47c95759a369af81fb19556c48261530a79;p=spider.git diff --git a/cmd/export.pl b/cmd/export.pl index 0e803a2f..fc1ebfd5 100644 --- a/cmd/export.pl +++ b/cmd/export.pl @@ -14,7 +14,7 @@ my @body; my $ref; my $fn; -return (1, $self->msg("e5")) if $self->priv < 9 || $self->consort ne 'local' || $self->remotecmd; +return (1, $self->msg("e5")) if $self->priv < 9 || $self->consort ne 'local' || $self->remotecmd || $self->inscript; return (1, $self->msg("export1")) unless @f == 2 && $f[0] =~ /^\d+$/; $msgno = $f[0];