From: doogie <>
Date: Wed, 10 Jul 2002 10:53:51 +0000 (-0800)
Subject: [project @ 2002-07-10 03:53:51 by doogie]
X-Git-Tag: release/2.6.0~1061
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=6531938bee6c2b34e9704b559a06671520874fcf;p=debbugs.git

[project @ 2002-07-10 03:53:51 by doogie]
Add support for listing *ALL* bugs at a certain severity.  Also, fix the
case when listing bugs by both severity and status.  $d{status} wasn't
being checked if it was defined.
---

diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi
index 58f83751..a632d404 100755
--- a/cgi/pkgreport.cgi
+++ b/cgi/pkgreport.cgi
@@ -147,12 +147,17 @@ if (defined $pkg) {
 		       $se = $1 if ($se =~ m/<(.*)>/);
 		       return $se eq $submitter;
 		     }, 'submitter-email', $submitter)};
-} elsif (defined $severity) {
+} elsif (defined($severity) && defined($status)) {
   $tag = "$status $severity bugs";
   @bugs = @{getbugs(sub {my %d=@_;
 		       return ($d{"severity"} eq $severity) 
 			 && ($d{"status"} eq $status);
 		     })};
+} elsif (defined($severity)) {
+  $tag = "$severity bugs";
+  @bugs = @{getbugs(sub {my %d=@_;
+		       return ($d{"severity"} eq $severity);
+		     }, 'severity', $severity)};
 }
 
 my $result = htmlizebugs(\@bugs);