From 5c232e771356b52b3acb962e258ccf83c792f68c Mon Sep 17 00:00:00 2001 From: "terry%mozilla.org" <> Date: Sat, 15 Jan 2000 06:04:49 +0000 Subject: Remove unused files. --- editowners.cgi | 70 ---------------------------------------------------------- 1 file changed, 70 deletions(-) delete mode 100755 editowners.cgi diff --git a/editowners.cgi b/editowners.cgi deleted file mode 100755 index 2957b75f2..000000000 --- a/editowners.cgi +++ /dev/null @@ -1,70 +0,0 @@ -#!/usr/bonsaitools/bin/perl -w -# -*- Mode: perl; indent-tabs-mode: nil -*- -# -# The contents of this file are subject to the Mozilla Public -# License Version 1.1 (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): Sam Ziegler - -# Code derived from editparams.cgi - -use diagnostics; -use strict; - -require "CGI.pl"; - -confirm_login(); - -print "Content-type: text/html\n\n"; - -if (!UserInGroup("editcomponents")) { - print "

Sorry, you aren't a member of the 'editcomponents' group.

\n"; - print "And so, you aren't allowed to edit the owners.\n"; - exit; -} - - -PutHeader("Edit Component Owners"); - -print "This lets you edit the owners of the program components of bugzilla.\n"; - -print "
\n"; - -my $rowbreak = ""; - -SendSQL("select program, value, initialowner from components order by program, value"); - -my @line; -my $curProgram = ""; - -while (@line = FetchSQLData()) { - if ($line[0] ne $curProgram) { - print $rowbreak; - print "\n"; - $curProgram = $line[0]; - } - print "\n"; -} - -print "

$line[0]:
$line[1]
\n"; - -print "\n"; - -print "
\n"; - -print "

Skip all this, and go back to the query page\n"; -- cgit v1.2.3-24-g4f1b