|
Lines 68-73
if ( $op eq "do_search" ) {
Link Here
|
| 68 |
my $startfrom = $query->param('startfrom') || 0; |
68 |
my $startfrom = $query->param('startfrom') || 0; |
| 69 |
my $resultsperpage = $query->param('resultsperpage') || 20; |
69 |
my $resultsperpage = $query->param('resultsperpage') || 20; |
| 70 |
|
70 |
|
|
|
71 |
if ( C4::Context->preference('ConsiderHeadingUse') ) { |
| 72 |
my $marcflavour = C4::Context->preference('marcflavour'); |
| 73 |
my $biblio_tag = substr($index, 4, 3); |
| 74 |
if ( $marcflavour eq 'MARC21' ) { |
| 75 |
my $heading_use_search_field = |
| 76 |
$biblio_tag =~ /^[127]/ ? 'Heading-use-main-or-added-entry' |
| 77 |
: $biblio_tag =~ /^6/ ? 'Heading-use-subject-added-entry' |
| 78 |
: $biblio_tag =~ /^8/ ? 'Heading-use-series-added-entry' |
| 79 |
: undef; |
| 80 |
if ($heading_use_search_field) { |
| 81 |
push @marclist, $heading_use_search_field; |
| 82 |
push @and_or, 'and'; |
| 83 |
push @excluding, ''; |
| 84 |
push @operator, 'is'; |
| 85 |
push @value, 'a'; |
| 86 |
} |
| 87 |
} |
| 88 |
} |
| 89 |
|
| 71 |
my $builder = Koha::SearchEngine::QueryBuilder->new( |
90 |
my $builder = Koha::SearchEngine::QueryBuilder->new( |
| 72 |
{ index => $Koha::SearchEngine::AUTHORITIES_INDEX } ); |
91 |
{ index => $Koha::SearchEngine::AUTHORITIES_INDEX } ); |
| 73 |
my $searcher = Koha::SearchEngine::Search->new( |
92 |
my $searcher = Koha::SearchEngine::Search->new( |
| 74 |
- |
|
|