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 446-451
my $builder = Koha::SearchEngine::QueryBuilder->new(
Link Here
|
446 |
my $searcher = Koha::SearchEngine::Search->new( |
447 |
my $searcher = Koha::SearchEngine::Search->new( |
447 |
{ index => $Koha::SearchEngine::BIBLIOS_INDEX } ); |
448 |
{ index => $Koha::SearchEngine::BIBLIOS_INDEX } ); |
448 |
|
449 |
|
|
|
450 |
# If index indicates the value is a barocode, we need to preproccess it before searching |
451 |
for ( my $i = 0; $i < @operands; $i++ ) { |
452 |
$operands[$i] = barcodedecode($operands[$i]) if $indexes[$i] eq 'bc'; |
453 |
} |
454 |
|
449 |
## I. BUILD THE QUERY |
455 |
## I. BUILD THE QUERY |
450 |
( |
456 |
( |
451 |
$error, $query, $simple_query, $query_cgi, |
457 |
$error, $query, $simple_query, $query_cgi, |
452 |
- |
|
|