X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fqrz.pl;fp=cmd%2Fshow%2Fqrz.pl;h=c20be45deeb06f2c9f636145d3daee4ad8997ed6;hb=101516b420ac77cd9eb8294651104e43f3461c06;hp=6779db42cbe32375d04f255402bf13fba7ced39d;hpb=5c96125fa684151fbae1daa2c76ca5522d0a09c0;p=spider.git

diff --git a/cmd/show/qrz.pl b/cmd/show/qrz.pl
index 6779db42..c20be45d 100644
--- a/cmd/show/qrz.pl
+++ b/cmd/show/qrz.pl
@@ -29,7 +29,7 @@ foreach $l (@list) {
 		Log('call', "$call: show/qrz \U$l");
 		my $state = "blank";
 		while (my $result = $t->getline) {
-			dbg('qrz', $result);
+			dbg($result) if isdbg('qrz');
 			if ($state eq 'blank' && $result =~ /^\s*Callsign\s*:/i) {
 				$state = 'go';
 			} elsif ($state eq 'go') {