From b093b5be97ce0f1d51149839938307404ad83cb5 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Thu, 21 Aug 2014 00:31:08 -0700 Subject: [PATCH] whitespace --- FS/FS/part_pkg/cdr_termination.pm | 13 ++++++------- 1 file 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; -- 2.11.0