From: Dirk Koopman <djk@tobit.co.uk>
Date: Sun, 4 Sep 2022 22:59:57 +0000 (+0100)
Subject: Fix show/wcy if no broadcasts received
X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=a2b5f735ab1f3a416c95a43ad8bf4f183dd300eb;p=spider.git

Fix show/wcy if no broadcasts received
---

diff --git a/Changes b/Changes
index 706e354c..8a362585 100644
--- a/Changes
+++ b/Changes
@@ -1,4 +1,7 @@
-07Jun22=======================================================================
+06Jun22=======================================================================
+1. Fix show/wcy so that it works even if no wcy broadcasts have been received
+   this month. 
+01Jun22=======================================================================
 1. Fix show/(v)hfstats commands.
 2. Add CTY-3221 Prefixes.
 07Feb22=======================================================================
diff --git a/perl/WCY.pm b/perl/WCY.pm
index 1df87e80..534d89d7 100644
--- a/perl/WCY.pm
+++ b/perl/WCY.pm
@@ -171,7 +171,7 @@ sub search
 	my $count;
 	my $i;
 
-	if ($t == $main::systime && ($to <= $maxcache)) {
+	if ($t == $main::systime && ($to && $to <= @cache)) {
 		dbg("using wcy cache") if isdbg('wcy');
 		@out = reverse @cache;
 		pop @out while @out > $to;