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

Ivan,,, ivan at wavetail.420.am
Thu Jun 5 12:25:36 PDT 2008


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

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	flat.pm 
Log Message:
implement quantity charging for setup fees

Index: flat.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_pkg/flat.pm,v
retrieving revision 1.13.2.7
retrieving revision 1.13.2.8
diff -u -d -r1.13.2.7 -r1.13.2.8
--- flat.pm	23 Dec 2007 21:59:46 -0000	1.13.2.7
+++ flat.pm	5 Jun 2008 19:25:33 -0000	1.13.2.8
@@ -98,7 +98,9 @@
     push @$details, $self->option( 'additional_info' . $i++ );
   }
 
-  $self->option('setup_fee');
+  my $quantity = $cust_pkg->quantity || 1;
+
+  sprintf("%.2f", $quantity * $self->option('setup_fee') );
 }
 
 sub calc_recur {



More information about the freeside-commits mailing list