fix console.pl

[spider.git] / cmd / load / dxqsl.pl

diff --git a/cmd/load/dxqsl.pl b/cmd/load/dxqsl.pl
index b17382294f6e17cb4f20833a088a3688533e79ff..679864c0077576eb82f43ec7e212500c45c93398 100644 (file)
--- a/cmd/load/dxqsl.pl
+++ b/cmd/load/dxqsl.pl
@@ -5,4 +5,6 @@ my $self = shift;
 return (1, $self->msg('e5')) if $self->priv < 9;
 QSL::finish();
 my $r = QSL::init(1);
-return (1, $r ? $self->msg('ok') : $self->msg('e2', "$!"));
+my @out;
+push @out, $self->msg($r ? 'ok':'e2', "$!");
+return (1, @out);