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

(-)C4/AuthoritiesMarc.pm (-1 / +1 lines)
Lines 899-905 Link Here
899
        $_->[1]=~s/$filtervalues/ /g; $query.= " and he,wrdl=\"".$_->[1]."\"" if ($_->[0]=~/[A-z]/);
899
        $_->[1]=~s/$filtervalues/ /g; $query.= " and he,wrdl=\"".$_->[1]."\"" if ($_->[0]=~/[A-z]/);
900
      }
900
      }
901
    }
901
    }
902
    my ($error, $results, $total_hits)=SimpleSearch( $query, 0, 1, [ "authorityserver" ] );
902
    my ($error, $results, $total_hits) = C4::Search::SimpleSearch( $query, 0, 1, [ "authorityserver" ] );
903
    # there is at least 1 result => return the 1st one
903
    # there is at least 1 result => return the 1st one
904
    if (@$results>0) {
904
    if (@$results>0) {
905
      my $marcrecord = MARC::File::USMARC::decode($results->[0]);
905
      my $marcrecord = MARC::File::USMARC::decode($results->[0]);

Return to bug 5243