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:
parent
accdac8854
commit
56642a97de
|
|
@ -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();
|
||||
|
|
|
|||
Loading…
Reference in New Issue