Lines 141-146
use Modern::Perl;
Link Here
|
141 |
## load Koha modules |
141 |
## load Koha modules |
142 |
use C4::Context; |
142 |
use C4::Context; |
143 |
use C4::Output qw( output_html_with_http_headers pagination_bar ); |
143 |
use C4::Output qw( output_html_with_http_headers pagination_bar ); |
|
|
144 |
use C4::Circulation qw( barcodedecode ); |
144 |
use C4::Auth qw( get_template_and_user ); |
145 |
use C4::Auth qw( get_template_and_user ); |
145 |
use C4::Search qw( searchResults enabled_staff_search_views z3950_search_args new_record_from_zebra ); |
146 |
use C4::Search qw( searchResults enabled_staff_search_views z3950_search_args new_record_from_zebra ); |
146 |
use C4::Languages qw( getlanguage getLanguages ); |
147 |
use C4::Languages qw( getlanguage getLanguages ); |
Lines 439-444
my $builder = Koha::SearchEngine::QueryBuilder->new(
Link Here
|
439 |
my $searcher = Koha::SearchEngine::Search->new( |
440 |
my $searcher = Koha::SearchEngine::Search->new( |
440 |
{ index => $Koha::SearchEngine::BIBLIOS_INDEX } ); |
441 |
{ index => $Koha::SearchEngine::BIBLIOS_INDEX } ); |
441 |
|
442 |
|
|
|
443 |
# If index indicates the value is a barocode, we need to preproccess it before searching |
444 |
for ( my $i = 0; $i < @operands; $i++ ) { |
445 |
$operands[$i] = barcodedecode($operands[$i]) if $indexes[$i] eq 'bc'; |
446 |
} |
447 |
|
442 |
## I. BUILD THE QUERY |
448 |
## I. BUILD THE QUERY |
443 |
( |
449 |
( |
444 |
$error, $query, $simple_query, $query_cgi, |
450 |
$error, $query, $simple_query, $query_cgi, |
445 |
- |
|
|