|
Lines 224-236
sub SearchAuthorities {
Link Here
|
| 224 |
for(my $i = 0 ; $i <= $#{$value} ; $i++) |
224 |
for(my $i = 0 ; $i <= $#{$value} ; $i++) |
| 225 |
{ |
225 |
{ |
| 226 |
if (@$value[$i]){ |
226 |
if (@$value[$i]){ |
| 227 |
##If mainentry search $a tag |
|
|
| 228 |
if (@$tags[$i] eq "mainmainentry") { |
227 |
if (@$tags[$i] eq "mainmainentry") { |
| 229 |
|
228 |
$attr =" \@attr 1=Heading-Main "; #search only in $a |
| 230 |
# FIXME: 'Heading-Main' index not yet defined in zebra |
|
|
| 231 |
# $attr =" \@attr 1=Heading-Main "; |
| 232 |
$attr =" \@attr 1=Heading "; |
| 233 |
|
| 234 |
}elsif (@$tags[$i] eq "mainentry") { |
229 |
}elsif (@$tags[$i] eq "mainentry") { |
| 235 |
$attr =" \@attr 1=Heading "; |
230 |
$attr =" \@attr 1=Heading "; |
| 236 |
}else{ |
231 |
}else{ |