proper fix for signupdate_age that works in customer context too, RT#31213
authorIvan Kohler <ivan@freeside.biz>
Fri, 12 Dec 2014 23:37:24 +0000 (15:37 -0800)
committerIvan Kohler <ivan@freeside.biz>
Fri, 12 Dec 2014 23:37:24 +0000 (15:37 -0800)
FS/FS/part_event/Condition/signupdate_age.pm

index 0c78b4c..0cfe550 100644 (file)
@@ -14,11 +14,11 @@ sub option_fields {
 }
 
 sub condition {
-  my( $self, $cust_bill, %opt ) = @_;
+  my( $self, $object, %opt ) = @_;
 
   my $age = $self->option_age_from('age', $opt{'time'} );
 
-  my $cust_main = $cust_bill->cust_main;
+  my $cust_main = $self->cust_main($object);
   ( $cust_main->signupdate - 60 ) <= $age;
 
 }