Bugzilla source.

1 files changed, 44 insertions, 0 deletions

diff --git a/show_bug.cgi b/show_bug.cgi
new file mode 100755
index 000000000..5228ed394
--- /dev/null
+++ b/show_bug.cgi
@@ -0,0 +1,44 @@
+#! /usr/bonsaitools/bin/mysqltcl
+# -*- Mode: tcl; indent-tabs-mode: nil -*-
+#
+# The contents of this file are subject to the Mozilla Public License
+# Version 1.0 (the "License"); you may not use this file except in
+# compliance with the License. You may obtain a copy of the License at
+# http://www.mozilla.org/MPL/
+# 
+# Software distributed under the License is distributed on an "AS IS"
+# basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
+# License for the specific language governing rights and limitations
+# under the License.
+# 
+# The Original Code is the Bugzilla Bug Tracking System.
+# 
+# The Initial Developer of the Original Code is Netscape Communications
+# Corporation. Portions created by Netscape are Copyright (C) 1998
+# Netscape Communications Corporation. All Rights Reserved.
+# 
+# Contributor(s): Terry Weissman <terry@mozilla.org>
+
+source "CGI.tcl"
+puts "Content-type: text/html"
+puts ""
+
+
+if {[lookup FORM id] == ""} {
+  puts "<H2>Search By Bug Number</H2>"
+  puts "<FORM METHOD=GET ACTION=\"show_bug.cgi\">"
+  puts "You may find a single bug by entering its bug id here: "
+  puts "<INPUT NAME=id>"
+  puts "<INPUT TYPE=\"submit\" VALUE=\"Show Me This Bug\">"
+  puts "</FORM>"
+  exit 0
+}
+ConnectToDatabase
+
+GetVersionTable
+
+PutHeader "Bugzilla bug $FORM(id)" "Bugzilla Bug" $FORM(id)
+navigation_header
+
+puts "<HR>"
+source "bug_form.tcl"