diff options
| author | ivan <ivan> | 2011-08-17 21:07:54 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2011-08-17 21:07:54 +0000 |
| commit | 0a168436993a1244800f13305d6bdabce86943a0 (patch) | |
| tree | 45b68cae578e2bfb2e0a336024a19be028b1a68f | |
| parent | 033028122bf526b3d9d366bc4c72075b87918372 (diff) | |
fix 477 censustract links, RT#13922
| -rwxr-xr-x | httemplate/search/477partVI_census.html | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/httemplate/search/477partVI_census.html b/httemplate/search/477partVI_census.html index 9134bacca..d28caeb47 100755 --- a/httemplate/search/477partVI_census.html +++ b/httemplate/search/477partVI_census.html @@ -130,8 +130,16 @@ my $count_query = 'SELECT count(*) FROM ( ('. @sql_query ). ') ) AS foo'; -my $link = 'cust_pkg.cgi?'. - join(';', map{ "$_=". $search_hash{$_} } keys %search_hash). ';'; +my $link = 'cust_pkg.cgi?'. join(';', + map { my $key = $_; + my @values = ref($search_hash{$_}) + ? @{ $search_hash{$_} } + : $search_hash{$_} + map { "$key=$_" } @values + } + keys %search_hash + ). ';'; + my $link_suffix = sub { my $row = shift; my $result = 'censustract='. $row->censustract. ';'; $result .= 'report_option='. @row_option[$row->upload - 1] |