From a64a5311f46f90cc33f6668eb0e4e6e317ca0f76 Mon Sep 17 00:00:00 2001 From: Martin Renvoize Date: Mon, 11 May 2020 21:14:24 +0100 Subject: [PATCH] Bug 25417: (QA follow-up) Restore 'fixing' of fines Signed-off-by: Martin Renvoize Signed-off-by: Kyle M Hall Signed-off-by: Martin Renvoize Signed-off-by: Joy Nelson --- C4/Circulation.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index cbb2b11e80..bc20b480f5 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -2394,11 +2394,9 @@ sub _FixOverduesOnReturn { return 0 unless $accountlines->count; # no warning, there's just nothing to fix my $accountline = $accountlines->next; - if ($exemptfine) { - my $amountoutstanding = $accountline->amountoutstanding; - - return if $amountoutstanding <= 0; + my $amountoutstanding = $accountline->amountoutstanding; + if ($exemptfine && ($amountoutstanding != 0)) { my $account = Koha::Account->new({patron_id => $borrowernumber}); my $credit = $account->add_credit( { -- 2.39.5