Lines 216-227
sub SearchPrefs {
Link Here
|
216 |
|
216 |
|
217 |
foreach my $piece ( @$line ) { |
217 |
foreach my $piece ( @$line ) { |
218 |
if ( ref( $piece ) eq 'HASH' ) { |
218 |
if ( ref( $piece ) eq 'HASH' ) { |
219 |
if ( !$piece->{'pref'} ){ next; } |
219 |
if ( !$piece->{'pref'} ){ |
220 |
if ( $piece->{'pref'} =~ /^$searchfield$/i ) { |
220 |
next; |
221 |
my ( undef, $LINES ) = TransformPrefsToHTML( $data, $searchfield ); |
221 |
} |
222 |
|
222 |
if ( matches( $piece->{'pref'}, \@terms) ) { |
223 |
return { search_jumped => 1, tab => $tab_name, tab_title => $title, LINES => $LINES }; |
|
|
224 |
} elsif ( matches( $piece->{'pref'}, \@terms) ) { |
225 |
$matched = 1; |
223 |
$matched = 1; |
226 |
} elsif ( ref( $piece->{'choices'} ) eq 'HASH' && grep( { $_ && matches( $_, \@terms ) } values( %{ $piece->{'choices'} } ) ) ) { |
224 |
} elsif ( ref( $piece->{'choices'} ) eq 'HASH' && grep( { $_ && matches( $_, \@terms ) } values( %{ $piece->{'choices'} } ) ) ) { |
227 |
$matched = 1; |
225 |
$matched = 1; |
228 |
- |
|
|