From 66ae2ee57d0daa168fe3ff4d33585241b890c873 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 18 Dec 2013 14:44:53 -0500 Subject: [PATCH] Bug 11419: display Z39.50 search errors more completely When a z39.50 server isn't able to be searched successfully, the yellow error box came up empty. This patch fixes the problem. 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 Signed-off-by: Katrin Fischer 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. Signed-off-by: Galen Charlton (cherry picked from commit 0fc114eee3f649abea88a62502211c595c2867b8) Signed-off-by: Fridolin SOMERS (cherry picked from commit 0c4e9a01544d898db10e704aea15633d689311be) Signed-off-by: Tomas Cohen Arazi --- C4/Breeding.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Breeding.pm b/C4/Breeding.pm index 01aca2105d..96de7bfe3f 100644 --- a/C4/Breeding.pm +++ b/C4/Breeding.pm @@ -361,7 +361,7 @@ sub Z3950Search { my ($error, $errmsg, $addinfo, $diagset)= $oConnection[$k]->error_x(); if ($error) { if ($error =~ m/^(10000|10007)$/ ) { - push(@errconn, {'server' => $serverhost[$k]}); + push(@errconn, { server => $serverhost[$k], error => $error }); } } else { -- 2.39.5