[freeside-commits] freeside/FS/FS/ClientAPI MyAccount.pm, 1.86, 1.87

[Jeff Finucane,420,,]

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

Modified Files:
	MyAccount.pm 
Log Message:
update flat_introrate plan to better fit current codebase RT#4912

Index: MyAccount.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/MyAccount.pm,v
retrieving revision 1.86
retrieving revision 1.87
diff -u -d -r1.86 -r1.87
--- MyAccount.pm	25 May 2009 01:49:33 -0000	1.86
+++ MyAccount.pm	2 Jul 2009 01:26:46 -0000	1.87
@@ -1209,7 +1209,8 @@
   my $total = $cust_main->balance;
 
   my @array = map {
-                    $total += $_->part_pkg->base_recur;
+                    my $bill = $_->bill;
+                    $total += $_->part_pkg->base_recur($_, \$bill);
                     my $renew_date = $_->part_pkg->add_freq($_->bill);
                     {
                       'pkgnum'             => $_->pkgnum,