From: ivan Date: Thu, 17 Sep 2009 23:45:21 +0000 (+0000) Subject: eliminate mystery "min ( N.NN, M.MM )" warning X-Git-Tag: freeside_1_9_1^2~79 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=790efa50f8968d9d18028ef8aeaa7a8c7c16965c;p=freeside.git eliminate mystery "min ( N.NN, M.MM )" warning --- diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 68571f77e..03c1c1d92 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -628,7 +628,7 @@ sub apply_payments_and_credits { } next unless $owed > 0; - warn "min ( $unapp_amount, $owed )\n"; + warn "min ( $unapp_amount, $owed )\n" if $DEBUG; $app->amount( sprintf('%.2f', min( $unapp_amount, $owed ) ) ); $app->invnum( $self->invnum );