|
Lines 25-30
use Koha::SearchEngine;
Link Here
|
| 25 |
use Koha::SearchEngine::Search; |
25 |
use Koha::SearchEngine::Search; |
| 26 |
use Koha::SearchEngine::QueryBuilder; |
26 |
use Koha::SearchEngine::QueryBuilder; |
| 27 |
use Koha::Util::Normalize qw/legacy_default remove_spaces upper_case lower_case ISBN/; |
27 |
use Koha::Util::Normalize qw/legacy_default remove_spaces upper_case lower_case ISBN/; |
|
|
28 |
use Carp::Always; |
| 28 |
|
29 |
|
| 29 |
=head1 NAME |
30 |
=head1 NAME |
| 30 |
|
31 |
|
|
Lines 833-842
sub _get_match_keys {
Link Here
|
| 833 |
} |
834 |
} |
| 834 |
elsif ( $field->is_control_field() ) { |
835 |
elsif ( $field->is_control_field() ) { |
| 835 |
$string = $field->data(); |
836 |
$string = $field->data(); |
| 836 |
} else { |
837 |
} elsif ( defined $component->{subfields} && keys %{$component->{subfields}} ){ |
| 837 |
$string = $field->as_string( |
838 |
$string = $field->as_string( |
| 838 |
join('', keys %{ $component->{ subfields } }), ' ' # ' ' as separator |
839 |
join('', keys %{ $component->{ subfields } }), ' ' # ' ' as separator |
| 839 |
); |
840 |
); |
|
|
841 |
} else { |
| 842 |
$string = $field->as_string(); |
| 840 |
} |
843 |
} |
| 841 |
|
844 |
|
| 842 |
if ($component->{'length'}>0) { |
845 |
if ($component->{'length'}>0) { |