X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FTest%2FRecord%2FFetch.pm;h=4d422002b4f33a2a1ecfa78ad33449a21342a9a5;hp=b6ff9b4a89a57251622972437e4ab1f9c337d25b;hb=2bb11f5efaf3050bc111515f86abb2a3326327db;hpb=1e23eeb797f1bbe48e3d3977d864a3d148b71597

diff --git a/lib/ZOOM/IRSpy/Test/Record/Fetch.pm b/lib/ZOOM/IRSpy/Test/Record/Fetch.pm
index b6ff9b4..4d42200 100644
--- a/lib/ZOOM/IRSpy/Test/Record/Fetch.pm
+++ b/lib/ZOOM/IRSpy/Test/Record/Fetch.pm
@@ -57,16 +57,12 @@ sub completed_search {
 	my $qindex = $udata->{queryindex}+1;
 	my $q = $queries[$qindex];
 	return ZOOM::IRSpy::Status::TEST_SKIPPED
-	    if !defined $q;
+	    if !defined $q || $conn->record->zoom_error->{TIMEOUT} >= $max_timeout_errors;
 
-	if ($conn->record->zoom_error->{TIMEOUT} >= $max_timeout_errors) {
-	    $conn->log("irspy_test", "Got $max_timeout_errors timeouts, give up...");
-        } else {
-	    $conn->log("irspy_test", "Trying another search ...");
-	    $conn->irspy_search_pqf($queries[$qindex], { queryindex => $qindex }, {},
+	$conn->log("irspy_test", "Trying another search ...");
+	$conn->irspy_search_pqf($queries[$qindex], { queryindex => $qindex }, {},
 				ZOOM::Event::ZEND, \&completed_search,
 				exception => \&completed_search);
-	}
 	return ZOOM::IRSpy::Status::TASK_DONE;
     }
 
@@ -80,7 +76,7 @@ sub completed_search {
                    'librismarc',
                    'mab',
                    'normarc',
-#                   'opac',
+                   'opac',
                    'picamarc',
                    'rusmarc',
                    'summary',