From 4c359e47990e8dae13161e92b373aa4b16b76513 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Mon, 5 Mar 2001 22:29:05 +0000
Subject: [PATCH] uppercase it
---
cmd/show/qrz.pl | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/cmd/show/qrz.pl b/cmd/show/qrz.pl
index 4468e131..910b1997 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', $l) unless @out;
+ push @out, $self->msg('e3', 'qrz.com', uc $l) unless @out;
} else {
push @out, $self->msg('e18', 'QRZ.com');
}
--
2.43.0