should fix intermittent "Illegal (money) amount" error applying credits to invoices...

diff --git a/FS/FS/cust_credit_bill_pkg.pm b/FS/FS/cust_credit_bill_pkg.pm
index 158fc73..019a1a8 100644 (file)
--- a/FS/FS/cust_credit_bill_pkg.pm
+++ b/FS/FS/cust_credit_bill_pkg.pm
@@ -131,7 +131,7 @@ sub insert {
       my $cust_tax_exempt_pkg = new FS::cust_tax_exempt_pkg {
         'billpkgnum'       => $self->billpkgnum,
         'creditbillpkgnum' => $self->creditbillpkgnum,
-        'amount'           => 0-$amount,
+        'amount'           => sprintf('%.2f', 0-$amount),
         map { $_ => $exemption->$_ } split(',', $groupby)
       };
       my $error = $cust_tax_exempt_pkg->insert;