From 4ed16ac9266f781b874e314a59958954a52948c0 Mon Sep 17 00:00:00 2001
From: slef <slef>
Date: Wed, 26 Jul 2006 16:04:48 +0000
Subject: [PATCH] Bugfix for Nothing Found on servers with fast z3950 links

---
 z3950/search.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/z3950/search.pl b/z3950/search.pl
index b61d157ccf..ac07d0c981 100755
--- a/z3950/search.pl
+++ b/z3950/search.pl
@@ -77,9 +77,11 @@ my ($template, $loggedinuser, $cookie)
 				debug => 1,
 				});
 
+#MJR: check for pending then search results, else servers with fast 
+# z3950 links may miss results if the search completes between them
+my $numberpending= &checkz3950searchdone($random);
 # fill with books in breeding farm
 ($count, @results) = BreedingSearch($title,$isbn,$random);
-my $numberpending= &checkz3950searchdone($random);
 my @breeding_loop = ();
 for (my $i=0; $i <= $#results; $i++) {
 	my %row_data;
-- 
2.39.5