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