diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2014-08-21 00:30:40 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2014-08-21 00:30:40 -0700 |
| commit | 17eb4823b553563b97dbe0ef36689ca6dd5e466c (patch) | |
| tree | 950997ed256ef26c741ba6d7af2c0661ccb0e9cb /FS | |
| parent | 8eba24c5843a08f8221d1c6e998c9526bef28c0b (diff) | |
better error
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/part_pkg/bulk_Common.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/FS/FS/part_pkg/bulk_Common.pm b/FS/FS/part_pkg/bulk_Common.pm index c26eb1470..900ad0049 100644 --- a/FS/FS/part_pkg/bulk_Common.pm +++ b/FS/FS/part_pkg/bulk_Common.pm @@ -64,7 +64,8 @@ sub calc_recur { foreach my $cust_svc ( $self->_bulk_cust_svc( $cust_pkg, $sdate ) ) { my @label = $cust_svc->label_long( $$sdate, $last_bill ); - die "fatal: no label found, wtf?" unless scalar(@label); #? + die "fatal: no label found for svcnum ". $cust_svc->svcnum + unless scalar(@label); #? my $svc_details = $label[0]. ': '. $label[1]. ': '; $part_svc_label{$cust_svc->svcpart} ||= $label[0]; |