# (as will change-target packages)
@packages = grep !$_->main_pkgnum, @packages;
+foreach my $cust_pkg ( @packages ) {
+ $cust_pkg->{'_cust_pkg_discount_active'} =
+ [ $cust_pkg->cust_pkg_discount_active ];
+}
+
</%init>
%
% if ( $curuser->access_right('Discount customer package')
% && $part_pkg->can_discount
-% && ! scalar($cust_pkg->cust_pkg_discount_active)
+% && ! scalar( @{ $cust_pkg->{_cust_pkg_discount_active} } )
% && ! scalar($cust_pkg->part_pkg->part_pkg_discount)
% )
% {
my $html;
- foreach my $cust_pkg_discount ( $cust_pkg->cust_pkg_discount_active ) {
+ foreach my $cust_pkg_discount (@{ $cust_pkg->{_cust_pkg_discount_active} }) {
my $discount = $cust_pkg_discount->discount;