Lines 22-27
use CGI;
Link Here
|
22 |
use JSON qw( to_json ); |
22 |
use JSON qw( to_json ); |
23 |
|
23 |
|
24 |
use C4::Auth qw( get_template_and_user ); |
24 |
use C4::Auth qw( get_template_and_user ); |
|
|
25 |
use C4::Circulation qw( barcodedecode ); |
25 |
use C4::Output qw( output_with_http_headers output_html_with_http_headers ); |
26 |
use C4::Output qw( output_with_http_headers output_html_with_http_headers ); |
26 |
use C4::Items qw( SearchItems ); |
27 |
use C4::Items qw( SearchItems ); |
27 |
use C4::Koha qw( GetAuthorisedValues ); |
28 |
use C4::Koha qw( GetAuthorisedValues ); |
Lines 50-55
if (defined $format and $format eq 'json') {
Link Here
|
50 |
|
51 |
|
51 |
my @f = $cgi->multi_param('f'); |
52 |
my @f = $cgi->multi_param('f'); |
52 |
my @q = $cgi->multi_param('q'); |
53 |
my @q = $cgi->multi_param('q'); |
|
|
54 |
|
55 |
# If index indicates the value is a barcode, we need to preproccess it before searching |
56 |
for ( my $i = 0; $i < @q; $i++ ) { |
57 |
$q[$i] = barcodedecode($q[$i]) if $f[$i] eq 'barcode'; |
58 |
} |
59 |
|
53 |
push @q, '' if @q == 0; |
60 |
push @q, '' if @q == 0; |
54 |
my @op = $cgi->multi_param('op'); |
61 |
my @op = $cgi->multi_param('op'); |
55 |
my @c = $cgi->multi_param('c'); |
62 |
my @c = $cgi->multi_param('c'); |
56 |
- |
|
|