Lines 838-847
sub _get_match_keys {
Link Here
|
838 |
} |
838 |
} |
839 |
elsif ( $field->is_control_field() ) { |
839 |
elsif ( $field->is_control_field() ) { |
840 |
$string = $field->data(); |
840 |
$string = $field->data(); |
841 |
} else { |
841 |
} elsif ( defined $component->{subfields} && keys %{$component->{subfields}} ){ |
842 |
$string = $field->as_string( |
842 |
$string = $field->as_string( |
843 |
join('', keys %{ $component->{ subfields } }), ' ' # ' ' as separator |
843 |
join('', keys %{ $component->{ subfields } }), ' ' # ' ' as separator |
844 |
); |
844 |
); |
|
|
845 |
} else { |
846 |
$string = $field->as_string(); |
845 |
} |
847 |
} |
846 |
|
848 |
|
847 |
if ($component->{'length'}>0) { |
849 |
if ($component->{'length'}>0) { |