X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_event.pm;h=5924851fd152e3b73eb3dc185fe5eb3c7dde7a11;hb=1d920e3661c29398763d05c82bbe3a493a19fbae;hp=13b3efa4bfcfa5e8daf79abe810d3d968b2f6cf7;hpb=f9bba7174781a1be9fb275d3ede18d9c65071ef0;p=freeside.git

diff --git a/FS/FS/cust_event.pm b/FS/FS/cust_event.pm
index 13b3efa4b..5924851fd 100644
--- a/FS/FS/cust_event.pm
+++ b/FS/FS/cust_event.pm
@@ -190,6 +190,7 @@ sub test_conditions {
   my $part_event = $self->part_event;
   my $object = $self->cust_X;
   my @conditions = $part_event->part_event_condition;
+  $opt{'cust_event'} = $self;
 
   #no unsatisfied conditions
   #! grep ! $_->condition( $object, %opt ), @conditions;