@@ -, +, @@ @foo = $cgi->param('foo'); @foo = $cgi->multi_param('foo'); --- acqui/finishreceive.pl | 2 +- catalogue/search.pl | 2 +- labels/label-create-csv.pl | 4 ++-- labels/label-create-pdf.pl | 4 ++-- labels/label-create-xml.pl | 4 ++-- labels/label-edit-batch.pl | 4 ++-- labels/label-print.pl | 6 +++--- opac/opac-search.pl | 2 +- patroncards/edit-batch.pl | 6 +++--- reserve/renewscript.pl | 8 ++++---- tags/review.pl | 2 +- tools/export.pl | 2 +- 12 files changed, 23 insertions(+), 23 deletions(-) --- a/acqui/finishreceive.pl +++ a/acqui/finishreceive.pl @@ -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); --- a/catalogue/search.pl +++ a/catalogue/search.pl @@ -384,7 +384,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; --- a/labels/label-create-csv.pl +++ a/labels/label-create-csv.pl @@ -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; --- a/labels/label-create-pdf.pl +++ a/labels/label-create-pdf.pl @@ -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; --- a/labels/label-create-xml.pl +++ a/labels/label-create-xml.pl @@ -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; --- a/labels/label-edit-batch.pl +++ a/labels/label-edit-batch.pl @@ -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'}; --- a/labels/label-print.pl +++ a/labels/label-print.pl @@ -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; --- a/opac/opac-search.pl +++ a/opac/opac-search.pl @@ -414,7 +414,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 ) { --- a/patroncards/edit-batch.pl +++ a/patroncards/edit-batch.pl @@ -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'}; --- a/reserve/renewscript.pl +++ a/reserve/renewscript.pl @@ -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'); --- a/tags/review.pl +++ a/tags/review.pl @@ -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') { --- a/tools/export.pl +++ a/tools/export.pl @@ -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' --