From 4b754b14865ba7fea7c0f08106ce0a2a9244c205 Mon Sep 17 00:00:00 2001
From: ajt <>
Date: Mon, 26 Feb 2001 04:51:46 -0800
Subject: [PATCH] [project @ 2001-02-26 04:51:46 by ajt] disable all such bugs
link get rid of double space when doing non-archived pkgreports
---
cgi/common.pl | 3 ++-
cgi/pkgreport.cgi | 6 +++---
2 files changed, 5 insertions(+), 4 deletions(-)
diff --git a/cgi/common.pl b/cgi/common.pl
index 8af9059f..e6699734 100644
--- a/cgi/common.pl
+++ b/cgi/common.pl
@@ -262,7 +262,8 @@ sub htmlizebugs {
$severity = $debbugs::gDefaultSeverity if ($severity eq '');
next unless defined $section{${pending} . "_" . ${severity}};
$result .= "
$debbugs::gSeverityDisplay{$severity} - $displayshowpending{$pending}
\n";
- $result .= "(A list of all such bugs is available).\n";
+ #$result .= "(A list of all such bugs is available).\n";
+ $result .= "(A list of all such bugs used to be available).\n";
$result .= "\n";
$result .= $section{$pending . "_" . $severity};
$result .= "
\n";
diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi
index a3550237..61185851 100755
--- a/cgi/pkgreport.cgi
+++ b/cgi/pkgreport.cgi
@@ -32,7 +32,7 @@ my $archive = ($param{'archive'} || "no") eq "yes";
my $include = $param{'include'} || "";
my $exclude = $param{'exclude'} || "";
-my $Archived = $archive ? "Archived" : "";
+my $Archived = $archive ? " Archived" : "";
my $this = "";
@@ -102,11 +102,11 @@ print "Content-Type: text/html\n\n";
print "\n";
print "\n" .
- "$debbugs::gProject $Archived $debbugs::gBug report logs: $tag\n" .
+ "$debbugs::gProject$Archived $debbugs::gBug report logs: $tag\n" .
"\n" .
'' .
"\n";
-print "" . "$debbugs::gProject $Archived $debbugs::gBug report logs: $tag" .
+print "" . "$debbugs::gProject$Archived $debbugs::gBug report logs: $tag" .
"
\n";
if (defined $pkg) {
--
2.39.5