View | Details | Raw Unified | Return to bug 11419
Collapse All | Expand All

(-)a/C4/Breeding.pm (-2 / +1 lines)
Lines 349-355 sub Z3950Search { Link Here
349 
            my ($error)= $oConnection[$k]->error_x(); #ignores errmsg, addinfo, diagset
 349 
            my ($error)= $oConnection[$k]->error_x(); #ignores errmsg, addinfo, diagset
350 
            if ($error) {
 350 
            if ($error) {
351 
                if ($error =~ m/^(10000|10007)$/ ) {
 351 
                if ($error =~ m/^(10000|10007)$/ ) {
352 
                    push(@errconn, { 'server' => $serverinfo[$k]->{host} } );
 352 
                    push(@errconn, { server => $serverinfo[$k]->{host}, error => $error } );
353 
                }
 353 
                }
354 
            }
 354 
            }
355 
            else {
 355 
            else {
356 
-

Return to bug 11419