From 4857e1753d2fa365287d222e5fe8eacff9236eb5 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Mon, 5 Mar 2001 22:27:18 +0000
Subject: [PATCH] fix error in sh/qrz for calls that aren't found

---
 Changes         | 1 +
 cmd/show/qrz.pl | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index 5442857a..75ac7683 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,7 @@
 05Mar01=======================================================================
 1. do some major surgery on the connect logic to shorten the possibility of 
 duplicate connects happening
+2. fix stupid error on sh/qrz queries that don't work
 04Mar01=======================================================================
 1. allow fallback to english for help
 03Mar01=======================================================================
diff --git a/cmd/show/qrz.pl b/cmd/show/qrz.pl
index 4b05c7e0..4468e131 100644
--- a/cmd/show/qrz.pl
+++ b/cmd/show/qrz.pl
@@ -39,7 +39,7 @@ foreach $l (@list) {
 			}
 		}
 		$t->close;
-		push @out, $self->msg('e3', 'qrz.com', $call) unless @out;
+		push @out, $self->msg('e3', 'qrz.com', $l) unless @out;
 	} else {
 		push @out, $self->msg('e18', 'QRZ.com');
 	}
-- 
2.43.0