Update CalcFine to obey maxFine systempreference.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/C4/Overdues.pm b/C4/Overdues.pm
index 35ae49d..0a720b8 100644 (file)
--- 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);
 }