From 8f56ba335ac4b3ddd3d87d896e0d89f15827272b 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 --- C4/Circulation.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 99e1423e51..5f48cfc288 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -2430,11 +2430,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.20.1