diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2014-08-21 00:31:08 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2014-08-21 00:31:08 -0700 |
| commit | b093b5be97ce0f1d51149839938307404ad83cb5 (patch) | |
| tree | 6e63788aaafd228577c94acc5ad280e7e01de2c0 | |
| parent | dd02aa5b102c66726401b3b69d2d91f2b6918d25 (diff) | |
whitespace
| -rw-r--r-- | FS/FS/part_pkg/cdr_termination.pm | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/FS/FS/part_pkg/cdr_termination.pm b/FS/FS/part_pkg/cdr_termination.pm index 9011846b7..5413c185a 100644 --- a/FS/FS/part_pkg/cdr_termination.pm +++ b/FS/FS/part_pkg/cdr_termination.pm @@ -74,11 +74,11 @@ tie my %temporalities, 'Tie::IxHash', }, #cdr_column - 'fieldorder' => [qw( recur_temporality recur_method cutoff_day ), - FS::part_pkg::prorate_Mixin::fieldorder, - qw( + 'fieldorder' => [ qw( recur_temporality recur_method cutoff_day ), + FS::part_pkg::prorate_Mixin::fieldorder, + qw( output_format usage_section summarize_usage usage_mandate - ) + ), ], 'weight' => 48, @@ -106,9 +106,8 @@ sub calc_recur { my $charges = 0; #find an svc_external record - my @svc_external = map { $_->svc_x } - grep { $_->part_svc->svcdb eq 'svc_external' } - $cust_pkg->cust_svc; + my @svc_external = map { $_->svc_x } + $cust_pkg->cust_svc_unsorted( svcdb=>'svc_external' ); die "cdr_termination package has no svc_external service" unless @svc_external; |