Koha-community/Koha
15
7
Fork 0
Code Issues Releases Wiki Activity

Bug 16154: CGI->multi_param - Assign a list

Browse source 
This patch replaces the occurrences of
  @foo = $cgi->param('foo');
with
  @foo = $cgi->multi_param('foo');

perl -p -i -e
's/^(\s*@\w+\s*=\s*)\$(cgi|input|query)\->param\(/$1\$$2\->multi_param\(/xms'
**/*.pl

Signed-off-by: Owen Leonard <oleonard@myacpl.org>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

Signed-off-by: Brendan Gallagher <brendan@bywatersolutions.com>
This commit is contained in:
Jonathan Druart 2016-03-29 09:52:25 +01:00 committed by Brendan Gallagher
parent f3e4b5bbb6
commit a159d2b067
12 changed files with 23 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
acqui/finishreceive.pl
View file

@ -65,7 +65,7 @@ my $new_ordernumber = $ordernumber;
if ($quantityrec > $origquantityrec ) {
my @received_items = ();
if(C4::Context->preference('AcqCreateItem') eq 'ordering') {
@received_items = $input->param('items_to_receive');
@received_items = $input->multi_param('items_to_receive');
my @affects = split q{\|}, C4::Context->preference("AcqItemSetSubfieldsWhenReceived");
if ( @affects ) {
my $frameworkcode = GetFrameworkCode($biblionumber);

2
catalogue/search.pl
View file

@ -365,7 +365,7 @@ if ( C4::Context->preference('defaultSortField')
. C4::Context->preference('defaultSortOrder');
}
@sort_by = $cgi->param('sort_by');
@sort_by = $cgi->multi_param('sort_by');
$sort_by[0] = $default_sort_by unless $sort_by[0];
foreach my $sort (@sort_by) {
$template->param($sort => 1) if $sort;

4
labels/label-create-csv.pl
View file

@ -37,8 +37,8 @@ my @item_numbers;
$batch_id = $cgi->param('batch_id') if $cgi->param('batch_id');
my $template_id = $cgi->param('template_id') || undef;
my $layout_id = $cgi->param('layout_id') || undef;
@label_ids = $cgi->param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
@label_ids = $cgi->multi_param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->multi_param('item_number') if $cgi->param('item_number');
my $items = undef;

4
labels/label-create-pdf.pl
View file

@ -45,8 +45,8 @@ $batch_id = $cgi->param('batch_id') if $cgi->param('batch_id');
my $template_id = $cgi->param('template_id') || undef;
my $layout_id = $cgi->param('layout_id') || undef;
my $start_label = $cgi->param('start_label') || 1;
@label_ids = $cgi->param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
@label_ids = $cgi->multi_param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->multi_param('item_number') if $cgi->param('item_number');
my $items = undef;

4
labels/label-create-xml.pl
View file

@ -37,8 +37,8 @@ my @item_numbers;
$batch_id = $cgi->param('batch_id') if $cgi->param('batch_id');
my $template_id = $cgi->param('template_id') || undef;
my $layout_id = $cgi->param('layout_id') || undef;
@label_ids = $cgi->param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
@label_ids = $cgi->multi_param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->multi_param('item_number') if $cgi->param('item_number');
my $items = undef;

4
labels/label-edit-batch.pl
View file

@ -61,8 +61,8 @@ my @item_numbers;
my $number_list;
my $number_type = $cgi->param('number_type') || "barcode";
my $batch_id = $cgi->param('element_id') || $cgi->param('batch_id') || 0;
@label_ids = $cgi->param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
@label_ids = $cgi->multi_param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->multi_param('item_number') if $cgi->param('item_number');
$number_list = $cgi->param('number_list') if $cgi->param('number_list');
my $branch_code = C4::Context->userenv->{'branch'};

6
labels/label-print.pl
View file

@ -42,14 +42,14 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
my $op = $cgi->param('op') || 'none';
my @label_ids;
@label_ids = $cgi->param('label_id') if $cgi->param('label_id'); # this will handle individual label printing
@label_ids = $cgi->multi_param('label_id') if $cgi->param('label_id'); # this will handle individual label printing
my @batch_ids;
@batch_ids = $cgi->param('batch_id') if $cgi->param('batch_id');
@batch_ids = $cgi->multi_param('batch_id') if $cgi->param('batch_id');
my $layout_id = $cgi->param('layout_id') || undef;
my $template_id = $cgi->param('template_id') || undef;
my $start_label = $cgi->param('start_label') || 1;
my @item_numbers;
@item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
@item_numbers = $cgi->multi_param('item_number') if $cgi->param('item_number');
my $output_format = $cgi->param('output_format') || 'pdf';
my $referer = $cgi->param('referer') || undef;

2
opac/opac-search.pl
View file

@ -425,7 +425,7 @@ if ( C4::Context->preference('OPACdefaultSortField')
}
my @allowed_sortby = qw /acqdate_asc acqdate_dsc author_az author_za call_number_asc call_number_dsc popularity_asc popularity_dsc pubdate_asc pubdate_dsc relevance title_az title_za/;
@sort_by = $cgi->param('sort_by');
@sort_by = $cgi->multi_param('sort_by');
$sort_by[0] = $default_sort_by if !$sort_by[0] && defined($default_sort_by);
foreach my $sort (@sort_by) {
if ( grep { /^$sort$/ } @allowed_sortby ) {

6
patroncards/edit-batch.pl
View file

@ -55,9 +55,9 @@ my $display_columns = [ {_summary => {label => 'Summary', link_field => 0}
my $op = $cgi->param('op') || 'new';
my $batch_id = $cgi->param('element_id') || $cgi->param('batch_id') || 0;
my ( @label_ids, @item_numbers, @borrower_numbers );
@label_ids = $cgi->param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
@borrower_numbers = $cgi->param('borrower_number') if $cgi->param('borrower_number');
@label_ids = $cgi->multi_param('label_id') if $cgi->param('label_id');
@item_numbers = $cgi->multi_param('item_number') if $cgi->param('item_number');
@borrower_numbers = $cgi->multi_param('borrower_number') if $cgi->param('borrower_number');
my $errstr = $cgi->param('error') || '';
my $bor_num_list = $cgi->param('bor_num_list') || undef;
my $branch_code = C4::Context->userenv->{'branch'};

8
reserve/renewscript.pl
View file

@ -50,18 +50,18 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
my @data;
if ( $input->param('renew_all') ) {
@data = $input->param('all_items[]');
@data = $input->multi_param('all_items[]');
}
else {
@data = $input->param('items[]');
@data = $input->multi_param('items[]');
}
my @barcodes;
if ( $input->param('return_all') ) {
@barcodes = $input->param('all_barcodes[]');
@barcodes = $input->multi_param('all_barcodes[]');
}
else {
@barcodes = $input->param('barcodes[]');
@barcodes = $input->multi_param('barcodes[]');
}
my $branch = $input->param('branch');

2
tags/review.pl
View file

@ -97,7 +97,7 @@ foreach (qw( approve reject test )) {
}
$op ||= 'none';
@tags = $input->param('tags');
@tags = $input->multi_param('tags');
$borrowernumber == 0 and push @errors, {op_zero=>1};
if ($op eq 'approve') {

2
tools/export.pl
View file

@ -48,7 +48,7 @@ my @record_ids;
# biblionumbers is sent from circulation.pl only
if ( $query->param("biblionumbers") ) {
$record_type = 'bibs';
@record_ids = $query->param("biblionumbers");
@record_ids = $query->multi_param("biblionumbers");
}
# Default value for output_format is 'iso2709'