fix multiple pkgpart search, RT#5924

[freeside.git] / httemplate / search / cust_main.html

diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html
index 3282f0f..f098fd3 100755 (executable)
--- a/httemplate/search/cust_main.html
+++ b/httemplate/search/cust_main.html
@@ -43,9 +43,12 @@ my %search_hash = ();
 #$search_hash{'query'} = $cgi->keywords;
 
 #scalars
-for my $param (qw(
+my @scalars = qw (
   agentnum status cancelled_pkgs cust_fields flattened_pkgs custbatch
-)) {
+  no_censustract
+);
+
+for my $param ( @scalars ) {
   $search_hash{$param} = scalar( $cgi->param($param) )
     if $cgi->param($param);
 }
@@ -97,7 +100,7 @@ my $menubar = [];
 
 if ( $FS::CurrentUser::CurrentUser->access_right('Bulk send customer notices') ) {
 
-  my $uri = new URI::URL;
+  my $uri = new URI;
   $uri->query_form( \%search_hash );
   my $query = $uri->query;