[freeside-commits] freeside/FS/FS/part_pkg flat.pm, 1.13.2.8, 1.13.2.9

[Ivan,,,]

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

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	flat.pm 
Log Message:
fix one-time charge quantities & 

Index: flat.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_pkg/flat.pm,v
retrieving revision 1.13.2.8
retrieving revision 1.13.2.9
diff -u -d -r1.13.2.8 -r1.13.2.9
--- flat.pm	5 Jun 2008 19:25:33 -0000	1.13.2.8
+++ flat.pm	5 Jun 2008 20:09:34 -0000	1.13.2.9
@@ -100,7 +100,13 @@
 
   my $quantity = $cust_pkg->quantity || 1;
 
-  sprintf("%.2f", $quantity * $self->option('setup_fee') );
+  sprintf("%.2f", $quantity * $self->unit_setup($cust_pkg, $sdate, $details) );
+}
+
+sub unit_setup {
+  my($self, $cust_pkg, $sdate, $details ) = @_;
+
+  $self->option('setup_fee');
 }
 
 sub calc_recur {