diff options
| author | ivan <ivan> | 2005-11-28 16:38:54 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2005-11-28 16:38:54 +0000 |
| commit | 6e261010ac03cc635036da835b3cfd6f45071dca (patch) | |
| tree | 70f467cdf02bd96ffc2592214b7ddb207ddee7e4 /FS | |
| parent | 470a8626c0822e22a0b845b7c8ea1f09865db8a4 (diff) | |
better error msg
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/cust_svc.pm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/FS/FS/cust_svc.pm b/FS/FS/cust_svc.pm index 930e673..4c5fac0 100644 --- a/FS/FS/cust_svc.pm +++ b/FS/FS/cust_svc.pm @@ -385,7 +385,8 @@ sub seconds_since_sqlradacct { my $svc_x = $self->svc_x; my @part_export = $self->part_svc->part_export_usage; - die "no usage-capable export configured for this service type" + die "no accounting-capable exports are enabled for ". $self->part_svc->svc. + " service definition" unless @part_export; #or return undef; @@ -493,7 +494,8 @@ sub attribute_since_sqlradacct { my $svc_x = $self->svc_x; my @part_export = $self->part_svc->part_export_usage; - die "no usage-capable export configured for this service type" + die "no accounting-capable exports are enabled for ". $self->part_svc->svc. + " service definition" unless @part_export; #or return undef; @@ -552,7 +554,8 @@ sub get_session_history { #$attrib ??? my @part_export = $self->part_svc->part_export_usage; - die "no accounting-capable exports are enabled for this service definition" + die "no accounting-capable exports are enabled for ". $self->part_svc->svc. + " service definition" unless @part_export; #or return undef; |