From f948b6e2f41f67555ef13449b9a1d6f15ace4922 Mon Sep 17 00:00:00 2001
From: cjwatson <>
Date: Wed, 4 Dec 2002 20:50:46 -0800
Subject: [PATCH] [project @ 2002-12-04 20:50:46 by cjwatson] Make
 pkgreport.cgi?maint=&archive=yes return an error (#152777).

---
 cgi/pkgreport.cgi | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi
index 8b769642..8ecd8b6e 100755
--- a/cgi/pkgreport.cgi
+++ b/cgi/pkgreport.cgi
@@ -22,6 +22,19 @@ nice(5);
 
 my %param = readparse();
 
+my $repeatmerged = ($param{'repeatmerged'} || "yes") eq "yes";
+my $archive = ($param{'archive'} || "no") eq "yes";
+my $include = $param{'include'} || "";
+my $exclude = $param{'exclude'} || "";
+my $raw_sort = ($param{'raw'} || "no") eq "yes";
+my $bug_rev = ($param{'bug-rev'} || "no") eq "yes";
+my $pend_rev = ($param{'pend-rev'} || "no") eq "yes";
+my $sev_rev = ($param{'sev-rev'} || "no") eq "yes";
+my $pend_exc = $param{'&pend-exc'} || $param{'pend-exc'} || "";
+my $pend_inc = $param{'&pend-inc'} || $param{'pend-inc'} || "";
+my $sev_exc = $param{'&sev-exc'} || $param{'sev-exc'} || "";
+my $sev_inc = $param{'&sev-inc'} || $param{'sev-inc'} || "";
+
 my ($pkg, $src, $maint, $maintenc, $submitter, $severity, $status);
 
 my %which = (
@@ -42,7 +55,7 @@ foreach ( keys %which ) {
 		last;
 	}
 }
-if (!$found) {
+if (!$found && !$archive) {
 	foreach ( @allowedEmpty ) {
 		if (exists($param{$_})) {
 			${ $which{$_} } = '';
@@ -64,19 +77,6 @@ if (!$found) {
 }
 quit("You have to choose something to select by") if (!$found);
 
-my $repeatmerged = ($param{'repeatmerged'} || "yes") eq "yes";
-my $archive = ($param{'archive'} || "no") eq "yes";
-my $include = $param{'include'} || "";
-my $exclude = $param{'exclude'} || "";
-my $raw_sort = ($param{'raw'} || "no") eq "yes";
-my $bug_rev = ($param{'bug-rev'} || "no") eq "yes";
-my $pend_rev = ($param{'pend-rev'} || "no") eq "yes";
-my $sev_rev = ($param{'sev-rev'} || "no") eq "yes";
-my $pend_exc = $param{'&pend-exc'} || $param{'pend-exc'} || "";
-my $pend_inc = $param{'&pend-inc'} || $param{'pend-inc'} || "";
-my $sev_exc = $param{'&sev-exc'} || $param{'sev-exc'} || "";
-my $sev_inc = $param{'&sev-inc'} || $param{'sev-inc'} || "";
-
 my $Archived = $archive ? " Archived" : "";
 
 my $this = "";
-- 
2.39.5