From 57c5d83998e169701c0103d51c710ec5c247f86d Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Mon, 2 Aug 2021 13:44:31 +0000 Subject: [PATCH] Bug 24190: (QA follow-up) record unchanged bookfund and fix typo Signed-off-by: Nick Clemens Signed-off-by: Jonathan Druart --- acqui/finishreceive.pl | 2 +- acqui/invoice.pl | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/acqui/finishreceive.pl b/acqui/finishreceive.pl index e37c91530e..f97c7ff46c 100755 --- a/acqui/finishreceive.pl +++ b/acqui/finishreceive.pl @@ -195,7 +195,7 @@ if ($suggestion_id) { if (C4::Context->preference("AcquisitionLog")) { my $infos = { quantityrec => $quantityrec, - bookfund => $bookfund, + bookfund => $bookfund || 'unchanged', tax_rate => $input->param("tax_rate"), replacementprice => $replacementprice, unitprice => $unitprice diff --git a/acqui/invoice.pl b/acqui/invoice.pl index 91edfc435f..7240d9319f 100755 --- a/acqui/invoice.pl +++ b/acqui/invoice.pl @@ -190,7 +190,7 @@ elsif ( $op && $op eq 'mod_adj' ) { note => $note[$i], budget_id => $budget_id[$i] || undef, encumber_open => defined $e_open{ $adjustment_id[$i] } ? 1 : 0, - }); + }; my $new_adj = Koha::Acquisition::Invoice::Adjustment->new($adj); $new_adj->store(); # Log this addition -- 2.39.5