From d431ebff93ba4ca9a909f05cd7b9bf26e1ebe51e Mon Sep 17 00:00:00 2001
From: Ryan Higgins <rch@liblime.com>
Date: Fri, 25 Jul 2008 02:58:01 -0500
Subject: [PATCH] Update CalcFine to obey maxFine systempreference.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 C4/Overdues.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/C4/Overdues.pm b/C4/Overdues.pm
index 35ae49d382..0a720b8e1a 100644
--- a/C4/Overdues.pm
+++ b/C4/Overdues.pm
@@ -279,6 +279,7 @@ sub CalcFine {
     } else {
         # a zero (or null)  chargeperiod means no charge.
     }
+	$amount = C4::Context->preference('maxFine') if(C4::Context->preference('maxFine') && ( $amount > C4::Context->preference('maxFine')));
     return ( $amount, $data->{'chargename'}, $days_minus_grace, $daystocharge);
 }
 
-- 
2.39.5