[project @ 2001-06-17 21:22:04 by doogie]

Pass all foourl subs thru urlsanit, and then pass urlsanit thru htmlsanit.

diff --git a/cgi/common.pl b/cgi/common.pl
index c716112222e70e8a5934f1804e0e009d221371fb..2f0dc2b51b8bcd019373bf78f7a15cee09b5e9f7 100644 (file)
--- a/cgi/common.pl
+++ b/cgi/common.pl
@@ -158,7 +158,7 @@ sub urlsanit {
     my $url = shift;
     $url =~ s/%/%25/g;
     $url =~ s/\+/%2b/g;
-    return $url;
+    return htmlsanit($url);
 }
 
 sub htmlsanit {
@@ -183,12 +183,12 @@ sub bugurl {
     $params .= "&archive=yes" if ($common_archive);
     $params .= "&repeatmerged=yes" if ($common_repeatmerged);
 
-    return $debbugs::gCGIDomain . "bugreport.cgi" . "?" . "$params";
+    return urlsanit($debbugs::gCGIDomain . "bugreport.cgi" . "?" . "$params");
 }
 
 sub packageurl {
     my $ref = shift;
-    return $debbugs::gCGIDomain . "package.cgi" . "?" . "package=$ref";
+    return urlsanit($debbugs::gCGIDomain . "package.cgi" . "?" . "package=$ref");
 }
 
 sub allbugs {