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

(-)a/C4/Breeding.pm (-14 lines)
Lines 230-248 sub Z3950Search { Link Here
230
sub _auth_build_query {
230
sub _auth_build_query {
231
    my ( $pars ) = @_;
231
    my ( $pars ) = @_;
232
232
233
    #FIXME These variables are not used
234
    my $nameany= $pars->{nameany};
235
    my $authorany= $pars->{authorany};
236
    my $authorpersonal= $pars->{authorpersonal};
237
    my $authorcorp= $pars->{authorcorp};
238
    my $authormeetingcon= $pars->{authormeetingcon};
239
    my $title= $pars->{title};
240
    my $uniformtitle= $pars->{uniformtitle};
241
    my $subject= $pars->{subject};
242
    my $subjectsubdiv= $pars->{subjectsubdiv};
243
    my $srchany= $pars->{srchany};
244
    my $authid= $pars->{authid};
245
246
    my $qry_build = {
233
    my $qry_build = {
247
        nameany           => '@attr 1=1002 "#term" ',
234
        nameany           => '@attr 1=1002 "#term" ',
248
        authorany         => '@attr 1=1003 "#term" ',
235
        authorany         => '@attr 1=1003 "#term" ',
249
- 

Return to bug 21404