diff options
Diffstat (limited to 'show_bug.cgi')
| -rwxr-xr-x | show_bug.cgi | 44 |
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" |