X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Fsys_qra.pl;h=201bc77c3b830b5a2ba904aacd1cbfc76d41f2df;hb=refs%2Fheads%2Fnewusers;hp=43260d1cf9ec62dbb64b519ba5340c0db2fa3234;hpb=78cf2dcb9be8128af7f8dc5ae37540c9c53c6057;p=spider.git diff --git a/cmd/set/sys_qra.pl b/cmd/set/sys_qra.pl index 43260d1c..201bc77c 100644 --- a/cmd/set/sys_qra.pl +++ b/cmd/set/sys_qra.pl @@ -3,9 +3,10 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; return (1, $self->msg('e5')) if $self->priv < 9; -return (1, run_cmd("set/qra $main::mycall")); +my @out = run_cmd($self, "set/qra $line"); +return (1, run_cmd($main::me, "set/qra $line"));