X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;h=2d04f411e14973c47de9712e53a032e516d79809;hb=846aa525969cab9b37936fb33b8705a68fd52886;hp=74b3f77319decf08c9f004a471d7cc34b46161e4;hpb=f0af07edebdfe705c66a50a4ccfa56d5663773d7;p=spider.git

diff --git a/perl/Spot.pm b/perl/Spot.pm
index 74b3f773..2d04f411 100644
--- a/perl/Spot.pm
+++ b/perl/Spot.pm
@@ -222,7 +222,7 @@ sub add
 	}
 	if ($_[3] =~ /(?:QSL|VIA)/i) {
 		my $q = QSL::get($_[1]) || new QSL $_[1];
-		$q->update($_[3], $_[2], $_[4]);
+		$q->update($_[3], $_[2], $_[4]) if $q;
 	}
 }