Lines 344-354
sub simple_search_compat {
Link Here
|
344 |
} |
344 |
} |
345 |
my $results = $self->search($query, undef, $max_results, %options); |
345 |
my $results = $self->search($query, undef, $max_results, %options); |
346 |
my @records; |
346 |
my @records; |
347 |
$results->each(sub { |
347 |
my $hits = $results->{'hits'}; |
348 |
my $marc = $self->decode_record_from_result(@_); |
348 |
foreach my $es_record (@{$hits->{'hits'}}) { |
349 |
push @records, $marc; |
349 |
push @records, $self->decode_record_from_result($es_record->{'_source'}); |
350 |
}); |
350 |
} |
351 |
return (undef, \@records, $results->total); |
351 |
return (undef, \@records, $hits->{'total'}); |
352 |
} |
352 |
} |
353 |
|
353 |
|
354 |
=head2 extract_biblionumber |
354 |
=head2 extract_biblionumber |
355 |
- |
|
|