diff options
Diffstat (limited to 'httemplate/search/cust_pkg.cgi')
| -rwxr-xr-x | httemplate/search/cust_pkg.cgi | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/httemplate/search/cust_pkg.cgi b/httemplate/search/cust_pkg.cgi index b30a2d58a..67e4c05c3 100755 --- a/httemplate/search/cust_pkg.cgi +++ b/httemplate/search/cust_pkg.cgi @@ -173,14 +173,15 @@ for (qw( agentnum custnum magic status custom cust_fields pkgbatch )) { } #arrays -for (qw( pkgpart classnum )) { - $search_hash{$_} = [ $cgi->param($_) ]; +for my $param (qw( pkgpart classnum )) { + $search_hash{$param} = [ $cgi->param($param) ]; + if grep { $_ eq $param } $cgi->param; } #scalars that need to be passed if empty -for my $param (qw(censustract censustract2 )) { +for my $param (qw( censustract censustract2 )) { $search_hash{$param} = $cgi->param($param) || '' - if ( grep { /$param/ } $cgi->param ); + if grep { $_ eq $param } $cgi->param; } my @report_option = $cgi->param('report_option') |