From 6531938bee6c2b34e9704b559a06671520874fcf Mon Sep 17 00:00:00 2001
From: doogie <>
Date: Wed, 10 Jul 2002 02:53:51 -0800
Subject: [PATCH] [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.

---
 cgi/pkgreport.cgi | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

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);
-- 
2.39.5