usability: customer tags with checkboxes instead of a select-multiple (fix advanced customer search)

1 files changed, 8 insertions, 1 deletions

diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html
index 1aa3390..b0ce31a 100755
--- a/httemplate/search/cust_main.html
+++ b/httemplate/search/cust_main.html
@@ -59,10 +59,17 @@ for my $param ( @scalars ) {
 }
 
 #lists
-for my $param (qw( classnum refnum tagnum pkg_classnum )) {
+for my $param (qw( classnum refnum pkg_classnum )) {
   $search_hash{$param} = [ $cgi->param($param) ];
 }
 
+#tags
+my $params = $cgi->Vars;
+$search_hash{'tagnum'} = [
+  map { /^tagnum(\d+)/ && $1 }
+    grep { /^tagnum(\d+)/ && $cgi->param($_) } keys %$params
+];
+
 ###
 # parse dates
 ###