From 413a5f43d233f15b706a8419660376a4270b06db Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle@bywatersolutions.com>
Date: Wed, 18 Dec 2013 14:44:53 -0500
Subject: [PATCH] [PASSED QA] Bug 11419 - z39.50 searches not displaying errors

When a z39.50 server isn't able to be searched successfully, the yellow
error box comes up empty.

Test Plan:
1) Go to Administration/z39.50 servers
2) Create a fake z39.50 server with a made up address
3) Go to cataloging, search only that server
4) Note the empty yellow alert box
5) Apply this patch
6) Re-run the search, not the alert box has a message in it now

Signed-off-by: Nora Blake <nblake@masslibsystem.org>
Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Passes all tests and QA script.
Works according to test plan.
When one of the selected servers gives result no dialog
box is shown before and after applying the patch.
---
 C4/Breeding.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Breeding.pm b/C4/Breeding.pm
index 8e01d41..69adcf4 100644
--- 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 {
-- 
1.8.3.2