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) { |