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

(-)a/C4/Breeding.pm (-1 / +1 lines)
Lines 222-228 sub Z3950Search { Link Here
222
        $oConnection[$_]->destroy();
222
        $oConnection[$_]->destroy();
223
    }
223
    }
224
224
225
    my @servers = ();
225
    @servers = ();
226
    foreach my $id (@id) {
226
    foreach my $id (@id) {
227
        push @servers, {id => $id};
227
        push @servers, {id => $id};
228
    }
228
    }
(-)a/C4/Linker/Z3950Server.pm (-1 / +12 lines)
Lines 102-107 sub get_link { Link Here
102
    return $self->SUPER::_handle_auth_limit($authid), $fuzzy, $status;
102
    return $self->SUPER::_handle_auth_limit($authid), $fuzzy, $status;
103
}
103
}
104
104
105
sub update_cache {
106
    my $self        = shift;
107
    my $heading     = shift;
108
    my $authid      = shift;
109
    my $search_form = $heading->search_form();
110
    my $fuzzy = 0;
111
112
    $self->{'cache'}->{$search_form}->{'cached'} = 1;
113
    $self->{'cache'}->{$search_form}->{'authid'} = $authid;
114
    $self->{'cache'}->{$search_form}->{'fuzzy'}  = $fuzzy;
115
}
116
105
sub flip_heading {
117
sub flip_heading {
106
    my $self    = shift;
118
    my $self    = shift;
107
    my $heading = shift;
119
    my $heading = shift;
108
- 

Return to bug 11300