freeside/FS/FS cust_main.pm,1.185,1.186

[Ivan Kohler]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory pouncequick:/tmp/cvs-serv23855

Modified Files:
	cust_main.pm 
Log Message:
fix error recharging w/prepaid card caused by rounding off of money value, closes: Bug#1237

Index: cust_main.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main.pm,v
retrieving revision 1.185
retrieving revision 1.186
diff -u -d -r1.185 -r1.186
--- cust_main.pm	8 Jun 2005 09:03:05 -0000	1.185
+++ cust_main.pm	15 Jun 2005 02:31:28 -0000	1.186
@@ -687,7 +687,7 @@
 
   my $cust_pay = new FS::cust_pay {
     'custnum' => $self->custnum,
-    'paid'    => $amount,
+    'paid'    => sprintf('%.2f', $amount),
     #'_date'   => #date the prepaid card was purchased???
     'payby'   => 'PREP',
     'payinfo' => $payinfo,