From 43947610c2a08c927d0a0dfde3323ba09562d92c Mon Sep 17 00:00:00 2001 From: "terry%netscape.com" <> Date: Wed, 14 Oct 1998 05:27:11 +0000 Subject: Removed some files that aren't used by anything. --- doclosebug.cgi | 53 ----------------------------------------------------- 1 file changed, 53 deletions(-) delete mode 100755 doclosebug.cgi (limited to 'doclosebug.cgi') diff --git a/doclosebug.cgi b/doclosebug.cgi deleted file mode 100755 index cfb353976..000000000 --- a/doclosebug.cgi +++ /dev/null @@ -1,53 +0,0 @@ -#! /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 - -source "CGI.tcl" -puts "Content-type: text/plain\n" - -set query "update bugs\nset -bug_status=RESOLVED, -bug_resolution=FIXED -where bug_id = $FORM(id)" - -set newcomment "Fixed by changes in $FORM(directory):" -foreach i $FORM(fileversions) { - lassign $i file version - append newcomment "\n $file ($version)" -} - -puts "Query is $query" -puts "Comment is $newcomment" - -exit - -ConnectToDatabase - -SendSQL $query - -while {[MoreSQLData]} { - FetchSQLData - set result [MoreSQLData] -} - -AppendComment $FORM(id) $FORM(who) $newcomment - - -exec ./processmail $FORM(id) < /dev/null > /dev/null 2> /dev/null & -- cgit v1.2.3-24-g4f1b