From 04291b18c526ffa53d5929587846da3808eb3ad7 Mon Sep 17 00:00:00 2001 From: miker Date: Thu, 20 Dec 2007 14:50:29 +0000 Subject: [PATCH] skip z sources if none are connected git-svn-id: svn://svn.open-ils.org/ILS/branches/acq-experiment@8248 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm index 5813c405a1..967b52743f 100755 --- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm @@ -184,6 +184,7 @@ sub do_class_search { $logger->debug("z3950: Connections created"); + return undef unless (@connections); while ((my $index = OpenILS::Utils::ZClient::event( \@connections )) != 0) { my $ev = $connections[$index - 1]->last_event(); $logger->debug("z3950: Received event $ev"); -- 2.11.0