From: gmc Date: Wed, 3 Nov 2010 20:31:01 +0000 (+0000) Subject: blimey X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=d488d65d969351009af1521a001c58c009fee2de;p=working%2FEvergreen.git blimey git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_2_0@18597 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm index 36339a3e66..d564d05226 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm @@ -768,7 +768,7 @@ sub fund_exceeds_balance_percent { if ( $allocations == 0 || # if no allocations were ever made, assume we have hit the stop percent - (($allocations - $balance + $debit_amount) / $allocations) * 100) > $fund->$method_name + ((($allocations - $balance + $debit_amount) / $allocations) * 100) > $fund->$method_name ) { $logger->info("fund would hit a limit: " . $fund->id . ", $balance, $debit_amount, $allocations, $method_name"); $e->event(