X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg%2Fdelayed_Mixin.pm;h=ab53bda0608e9b2f1376e4b2673c3b76c5b0e008;hb=f4756c56c26e6d3804b0639bbfb4cee12de34400;hp=83e543a4faba469bbc0eb23858bb395e495be473;hpb=98a2c1d79af4c475e8245651a79ded35ce3391dd;p=freeside.git

diff --git a/FS/FS/part_pkg/delayed_Mixin.pm b/FS/FS/part_pkg/delayed_Mixin.pm
index 83e543a4f..ab53bda06 100644
--- a/FS/FS/part_pkg/delayed_Mixin.pm
+++ b/FS/FS/part_pkg/delayed_Mixin.pm
@@ -23,7 +23,8 @@ use NEXT;
 );
 
 sub calc_setup {
-  my($self, $cust_pkg, $time ) = @_;
+  my $self = shift;
+  my( $cust_pkg, $time ) = @_;
 
   unless ( $self->option('delay_setup', 1) ) {
     my $d = $cust_pkg->bill || $time;
@@ -31,7 +32,7 @@ sub calc_setup {
     $cust_pkg->bill($d);
   }
   
-  $self->option('setup_fee');
+  $self->NEXT::calc_setup(@_);
 }
 
 sub calc_remain {