From 20f599f17eaf48ec1972fb7b10a214e7d2de4601 Mon Sep 17 00:00:00 2001
From: Ceri Davies <ceri@FreeBSD.org>
Date: Mon, 9 Jun 2003 14:58:00 +0000
Subject: [PATCH] The code in the last commit causes Internal Server Errors
 when executed; correct this.

---
 en/cgi/query-pr.cgi | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/en/cgi/query-pr.cgi b/en/cgi/query-pr.cgi
index f38cc90fe3..b18b863237 100755
--- a/en/cgi/query-pr.cgi
+++ b/en/cgi/query-pr.cgi
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-# $FreeBSD: www/en/cgi/query-pr.cgi,v 1.33 2003/05/21 18:57:10 ceri Exp $
+# $FreeBSD: www/en/cgi/query-pr.cgi,v 1.34 2003/06/08 20:59:51 ceri Exp $
 
 $ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin:/usr/local/bin";
 
@@ -93,6 +93,7 @@ while(<Q>) {
 	print &html_footer;
 	exit;
     } elsif (/^lockf: /) {
+	print &html_header("FreeBSD problem report");
 	print "<p>The PR database is currently busy; please try ",
 	    "<A HREF=\"./query-pr.cgi?pr=$pr\">your query</A> again.";
 	print &html_footer;