diff options
| author | mark <mark> | 2010-11-13 23:24:03 +0000 |
|---|---|---|
| committer | mark <mark> | 2010-11-13 23:24:03 +0000 |
| commit | e3076a94625f63b821a314fa99f5b7ad71f693f4 (patch) | |
| tree | 71c921587aa55c0b441be986e3d2eb93ab97f7b2 /httemplate/edit/process/part_pkg.cgi | |
| parent | 9c6cbdeddb3456ffbcb20efea9ba568cc0e6e02d (diff) | |
hidden pkg_svc flag, RT#9871
Diffstat (limited to 'httemplate/edit/process/part_pkg.cgi')
| -rwxr-xr-x | httemplate/edit/process/part_pkg.cgi | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/httemplate/edit/process/part_pkg.cgi b/httemplate/edit/process/part_pkg.cgi index 97ae4e7ee..724880190 100755 --- a/httemplate/edit/process/part_pkg.cgi +++ b/httemplate/edit/process/part_pkg.cgi @@ -117,11 +117,11 @@ my $args_callback = sub { #pkg_svc ### - my %pkg_svc = map { $_ => scalar($cgi->param("pkg_svc$_")) } - map { $_->svcpart } - qsearch('part_svc', {} ); + my @svcparts = map { $_->svcpart } qsearch('part_svc', {}); + my %pkg_svc = map { $_ => scalar($cgi->param("pkg_svc$_")) } @svcparts; + my %hidden_svc = map { $_ => scalar($cgi->param("hidden$_")) } @svcparts; - push @args, 'pkg_svc' => \%pkg_svc; + push @args, 'pkg_svc' => \%pkg_svc, 'hidden_svc' => \%hidden_svc; ### # cust_pkg and custnum_ref (inserts only) |