From: Mike Rylander <miker@esilibrary.com>
Date: Thu, 25 Sep 2014 17:10:57 +0000 (-0400)
Subject: LP#1198465 Excise overbill
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=2ee483a59d8de701d3e642a51f2d86be3a19cd02;p=working%2FEvergreen.git

LP#1198465 Excise overbill

Now that we don't accept the $overbill parameter, excise the
logic that uses it.

Signed-off-by: Mike Rylander <miker@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm
index 2059a1704e..62713bdab3 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm
@@ -1132,10 +1132,6 @@ sub generate_fines {
 
             my $f_idx = 0;
             my $fine = $fines[$f_idx] if (@fines);
-            if ($overbill) {
-                $fine = $fines[++$f_idx] while ($fine and $fine->voided);
-            }
-
             my $current_fine_total = 0;
             $current_fine_total += int($_->amount * 100) for (grep { $_ and !$_->voided } @fines);