fix small bug in radiator export
authorivan <ivan>
Mon, 28 Nov 2005 16:07:30 +0000 (16:07 +0000)
committerivan <ivan>
Mon, 28 Nov 2005 16:07:30 +0000 (16:07 +0000)
FS/FS/part_export/radiator.pm

index 869c033..7fa9485 100644 (file)
@@ -81,7 +81,7 @@ sub _radiator_hash {
 
   $hash{'servicename'} = ( $svc_acct->radius_groups )[0];
 
-  my $cust_pkg = $self->cust_svc->cust_pkg;
+  my $cust_pkg = $svc_acct->cust_svc->cust_pkg;
   $hash{validto} = $cust_pkg->bill
     if $cust_pkg && $cust_pkg->part_pkg->is_prepaid && $cust_pkg->bill;