close QSL before re-initing it.

diff --git a/cmd/load/qsl.pl b/cmd/load/qsl.pl
index ddf51d34d34219133ac1a2ac8672b4cdf4d9e410..b17382294f6e17cb4f20833a088a3688533e79ff 100644 (file)
--- a/cmd/load/qsl.pl
+++ b/cmd/load/qsl.pl
@@ -3,5 +3,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', "$!"));