diff options
author | Ivan Kohler <ivan@freeside.biz> | 2013-03-11 02:13:24 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2013-03-11 02:13:24 -0700 |
commit | 53a1130923c4905b267239c369949aadde657c7c (patch) | |
tree | 15566fd5de27866887ae4dfa05c4f37ae7b4bd62 /FS/FS/Template_Mixin.pm | |
parent | a2ff7564f36a5db81bdba053ff70017b8f438904 (diff) |
fix quotations, RT#21103
Diffstat (limited to 'FS/FS/Template_Mixin.pm')
-rw-r--r-- | FS/FS/Template_Mixin.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/FS/FS/Template_Mixin.pm b/FS/FS/Template_Mixin.pm index 0d0fbfb73..2a325349d 100644 --- a/FS/FS/Template_Mixin.pm +++ b/FS/FS/Template_Mixin.pm @@ -2049,6 +2049,11 @@ separate quantities, for some reason). =cut +sub _items_nontax { + my $self = shift; + grep { $_->pkgnum } $self->cust_bill_pkg; +} + sub _items_pkg { my $self = shift; my %options = @_; @@ -2056,7 +2061,7 @@ sub _items_pkg { warn "$me _items_pkg searching for all package line items\n" if $DEBUG > 1; - my @cust_bill_pkg = grep { $_->pkgnum } $self->cust_bill_pkg; + my @cust_bill_pkg = $self->_items_nontax; warn "$me _items_pkg filtering line items\n" if $DEBUG > 1; |