Bug 17692: Remove 'CGI::param called in list context' warnings

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
(cherry picked from commit 00591b2e09)
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
This commit is contained in:
Jonathan Druart 2016-12-20 14:29:49 +00:00 committed by Katrin Fischer
parent accdac8854
commit 56642a97de
1 changed files with 8 additions and 8 deletions

View File

@ -69,20 +69,20 @@ else {
if ($change) {
$schema->resultset('EdifactEan')->find($id)->update(
{
branchcode => $input->param('branchcode'),
description => $input->param('description'),
ean => $input->param('ean'),
id_code_qualifier => $input->param('id_code_qualifier'),
branchcode => scalar $input->param('branchcode'),
description => scalar $input->param('description'),
ean => scalar $input->param('ean'),
id_code_qualifier => scalar $input->param('id_code_qualifier'),
}
);
}
else {
my $new_ean = $schema->resultset('EdifactEan')->new(
{
branchcode => $input->param('branchcode'),
description => $input->param('description'),
ean => $input->param('ean'),
id_code_qualifier => $input->param('id_code_qualifier'),
branchcode => scalar $input->param('branchcode'),
description => scalar $input->param('description'),
ean => scalar $input->param('ean'),
id_code_qualifier => scalar $input->param('id_code_qualifier'),
}
);
$new_ean->insert();