From: Bill Erickson <berickxx@gmail.com>
Date: Fri, 23 Sep 2022 22:20:41 +0000 (-0400)
Subject: LP1786312 Due date extension honors max fine (follow up)
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=ce80eacd09a2c3e0afff4b88c68cb3430de5ed48;p=working%2FEvergreen.git

LP1786312 Due date extension honors max fine (follow up)

Signed-off-by: Bill Erickson <berickxx@gmail.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm
index 22d530d4dd..fb4ee8d275 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm
@@ -599,7 +599,7 @@ sub generate_fines {
             # occurred after the current due date*.  Otherwise, when a 
             # due date changes, the fine generator will back-fill billings
             # for a period of time where the item was not technically overdue.
-            @fines = grep { $_->billing_ts > $c->$due_date_method } @fines;
+            @fines = grep { $_->billing_ts gt $c->$due_date_method } @fines;
     
             my $f_idx = 0;
             my $fine = $fines[$f_idx] if (@fines);