quiet more useless warnings
authorChris Sharp <csharp@georgialibraries.org>
Tue, 31 Jan 2023 18:11:57 +0000 (13:11 -0500)
committerChris Sharp <csharp@georgialibraries.org>
Tue, 31 Jan 2023 18:11:57 +0000 (13:11 -0500)
Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Z3950.pm

index 743abcd..859d960 100644 (file)
@@ -279,7 +279,9 @@ sub do_class_search {
                 push @results, $res->{result}; 
                 push @connections, $res->{connection}; 
 
-                $logger->debug("z3950: Result object: $results[$i], Connection object: $connections[$i]");
+                if ($results[$i] && $connections[$i]) {
+                       $logger->debug("z3950: Result object: $results[$i], Connection object: $connections[$i]");
+               }
             } 
         }