Lines 67-72
if ( $op eq "do_search" ) {
Link Here
|
67 |
my $orderby = $query->param('orderby') || ''; |
67 |
my $orderby = $query->param('orderby') || ''; |
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 |
my $est_headings = $query->param('est_headings') || undef; |
71 |
|
72 |
if ( $est_headings ) { |
73 |
#my @value_established = ( 'a', 'f', '|' ); |
74 |
my @value_established = ( 'a' ); |
75 |
foreach ( @value_established ) { |
76 |
push @marclist, 'Kind-of-record'; |
77 |
push @and_or, 'or'; |
78 |
push @excluding, ''; |
79 |
push @operator, 'contains'; |
80 |
push @value, $_; |
81 |
} |
82 |
} |
70 |
|
83 |
|
71 |
my $builder = Koha::SearchEngine::QueryBuilder->new( |
84 |
my $builder = Koha::SearchEngine::QueryBuilder->new( |
72 |
{ index => $Koha::SearchEngine::AUTHORITIES_INDEX } ); |
85 |
{ index => $Koha::SearchEngine::AUTHORITIES_INDEX } ); |
Lines 76-81
if ( $op eq "do_search" ) {
Link Here
|
76 |
\@marclist, \@and_or, \@excluding, \@operator, |
89 |
\@marclist, \@and_or, \@excluding, \@operator, |
77 |
\@value, $authtypecode, $orderby |
90 |
\@value, $authtypecode, $orderby |
78 |
); |
91 |
); |
|
|
92 |
|
79 |
$template->param( search_query => $search_query ) if C4::Context->preference('DumpSearchQueryTemplate'); |
93 |
$template->param( search_query => $search_query ) if C4::Context->preference('DumpSearchQueryTemplate'); |
80 |
my $offset = $startfrom * $resultsperpage; |
94 |
my $offset = $startfrom * $resultsperpage; |
81 |
my ( $results, $total ) = |
95 |
my ( $results, $total ) = |
Lines 176-181
if ( $op eq "do_search" ) {
Link Here
|
176 |
operator_main => ( @operator > 1 && $operator[1] ) ? $operator[1] : '', |
190 |
operator_main => ( @operator > 1 && $operator[1] ) ? $operator[1] : '', |
177 |
operator_match => ( @operator > 2 && $operator[2] ) ? $operator[2] : '', |
191 |
operator_match => ( @operator > 2 && $operator[2] ) ? $operator[2] : '', |
178 |
operator_any => ( @operator > 3 && $operator[3] ) ? $operator[3] : '', |
192 |
operator_any => ( @operator > 3 && $operator[3] ) ? $operator[3] : '', |
|
|
193 |
est_headings => $est_headings, |
179 |
); |
194 |
); |
180 |
} |
195 |
} |
181 |
else { |
196 |
else { |