Bug 11550: Add UT for C4::Acquisition::GetOrder

[koha_fer] / C4 / Breeding.pm

diff --git a/C4/Breeding.pm b/C4/Breeding.pm
index 8e01d41..69adcf4 100644 (file)
--- a/C4/Breeding.pm
+++ b/C4/Breeding.pm
@@ -349,7 +349,7 @@ sub Z3950Search {
             my ($error)= $oConnection[$k]->error_x(); #ignores errmsg, addinfo, diagset
             if ($error) {
                 if ($error =~ m/^(10000|10007)$/ ) {
-                    push(@errconn, { 'server' => $serverinfo[$k]->{host} } );
+                    push(@errconn, { server => $serverinfo[$k]->{host}, error => $error } );
                 }
             }
             else {