X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FCGI.pm;fp=Debbugs%2FCGI.pm;h=3632f3f869b585665a896a108b88cab25f4fa8b3;hb=eb9aa285dae3b6c3bbe95c03dbcc6256cc9cdc92;hp=d51b9be0a469c5503f4e3648964c36bb2bb31e27;hpb=72224e621a103d00e00fabb15ad3efcd5146729d;p=debbugs.git

diff --git a/Debbugs/CGI.pm b/Debbugs/CGI.pm
index d51b9be..3632f3f 100644
--- a/Debbugs/CGI.pm
+++ b/Debbugs/CGI.pm
@@ -161,7 +161,9 @@ sub munge_url {
      while (my ($key,$value) = splice @old_param,0,2) {
 	  push @new_param,($key,$value) unless exists $params{$key};
      }
-     $new_url->query_form(@new_param,%params);
+     $new_url->query_form(@new_param,
+			  map {($_,$params{$_})}
+			  sort keys %params);
      return $new_url->as_string;
 }