X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FQSL.pm;h=b9f4ee85ace6df724cab7ba30200f46c6778896d;hb=refs%2Fheads%2Fmojo;hp=ec5512216f563ffe9929bad57253d9d87851799f;hpb=cc49b8f8c2ec3a975c7ace3f5bd8679580288406;p=spider.git

diff --git a/perl/QSL.pm b/perl/QSL.pm
index ec551221..b9f4ee85 100644
--- a/perl/QSL.pm
+++ b/perl/QSL.pm
@@ -48,7 +48,7 @@ sub init
 sub finish
 {
 	dbg("DXQSL finished");
-	$dbm->sync;
+	$dbm->sync if $dbm;
 	undef $dbm;
 	untie %u;
 }