--- branches/unesco/WebPac.pm	2006/04/13 19:44:51	730
+++ branches/unesco/WebPac.pm	2006/04/13 19:47:32	731
@@ -282,12 +282,15 @@
 		$url_params->{"f$i"} = $q->url_param("f$i");
 		$url_params_persist->{"f$i"} = $q->url_param("f$i") if ($persist);
 
+		my @v;
+
 		foreach my $v ($q->url_param("v$i")) {
 			# escape quotes so that phrase search work
 			$v =~ s/"/%22/g;
-			$url_params->{"v$i"} = $v;
-			$url_params_persist->{"v$i"} = $v if ($persist);
+			push @v, $v;
 		}
+		$url_params->{"v$i"} = \@v;
+		$url_params_persist->{"v$i"} = \@v if ($persist);
 
 		if ($q->param("e$i")) {
 			$url_params->{"e$i"} = $q->url_param("e$i");
@@ -424,7 +427,16 @@
 	# URL parametars for search results
 	sub cook_url_params {
 		my $hash = shift || return;
-		return join("&", map { $_."=".$hash->{$_} } keys %{$hash});
+		return join("&", map {
+			my $var = $_;
+			if (ref($hash->{$var}) eq 'ARRAY') {
+				join('&',
+					map { $var.'='.$_ } @{$hash->{$var}}
+				);
+			} else {
+				$var."=".$hash->{$var};
+			}
+		} keys %{$hash});
 	}
 
 	$tmpl->param('url_params',"?".cook_url_params($url_params));