From 753c84091976a28e16361f631be094aed17e0e58 Mon Sep 17 00:00:00 2001 From: doogie <> Date: Sun, 17 Jun 2001 20:22:04 -0800 Subject: [PATCH] [project @ 2001-06-17 21:22:04 by doogie] Pass all foourl subs thru urlsanit, and then pass urlsanit thru htmlsanit. --- cgi/common.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/cgi/common.pl b/cgi/common.pl index c7161122..2f0dc2b5 100644 --- 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 { -- 2.39.5