[freeside-commits] freeside/FS/FS/ClientAPI MyAccount.pm, 1.53.2.18, 1.53.2.19

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/ClientAPI
In directory wavetail.420.am:/tmp/cvs-serv25351/FS/FS/ClientAPI

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	MyAccount.pm 
Log Message:
have the prepay amounts include the current balance, RT#4623

Index: MyAccount.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/MyAccount.pm,v
retrieving revision 1.53.2.18
retrieving revision 1.53.2.19
diff -u -d -r1.53.2.18 -r1.53.2.19
--- MyAccount.pm	23 Jan 2009 00:49:42 -0000	1.53.2.18
+++ MyAccount.pm	24 Jan 2009 21:53:38 -0000	1.53.2.19
@@ -1030,7 +1030,7 @@
 
   #return { 'error' => 'No active packages to renew.' } unless @cust_pkg;
 
-  my $total = 0;
+  my $total = $cust_main->balance;
 
   my @array = map {
                     $total += $_->part_pkg->base_recur;