From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 2163 invoked from network); 16 Sep 2002 13:46:22 -0000 Received: from unknown (HELO monty-python.gnu.org) (199.232.76.173) by sources.redhat.com with SMTP; 16 Sep 2002 13:46:22 -0000 Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.10) id 17qwCh-0006xo-00; Mon, 16 Sep 2002 09:46:19 -0400 Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10) id 17qwBQ-0006iE-00 for help-gnats@gnu.org; Mon, 16 Sep 2002 09:45:00 -0400 Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10) id 17qwBN-0006fb-00 for help-gnats@gnu.org; Mon, 16 Sep 2002 09:44:59 -0400 Received: from claven.astro.princeton.edu ([128.112.25.10]) by monty-python.gnu.org with esmtp (Exim 4.10) id 17qwBM-0006em-00 for help-gnats@gnu.org; Mon, 16 Sep 2002 09:44:57 -0400 Received: from wire7.Princeton.EDU (IDENT:/0DLfQEzI6EgJtzyi60YX/k1p4gn98v+@wire7 [128.112.24.203]) by claven.astro.princeton.edu (8.11.6/8.11.6) with ESMTP id g8GDitG02618 for ; Mon, 16 Sep 2002 09:44:55 -0400 Received: (from rhl@localhost) by wire7.Princeton.EDU (8.11.6/8.11.2) id g8GDitH28136; Mon, 16 Sep 2002 09:44:55 -0400 From: Robert Lupton the Good MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-ID: <15749.57431.735527.614045@wire7.Princeton.EDU> To: help-gnats@gnu.org Subject: Patch for gnatsweb.pl In-Reply-To: <20020915103254.22538.88942.Mailman@monty-python.gnu.org> References: <20020915103254.22538.88942.Mailman@monty-python.gnu.org> X-Mailer: VM 7.03 under Emacs 20.7.1 Sender: help-gnats-admin@gnu.org Errors-To: help-gnats-admin@gnu.org X-BeenThere: help-gnats@gnu.org X-Mailman-Version: 2.0.11 Precedence: bulk List-Help: List-Post: List-Subscribe: , List-Id: General discussion about GNU GNATS List-Archive: Date: Mon, 16 Sep 2002 06:56:00 -0000 X-SW-Source: 2002-q3/txt/msg00084.txt.bz2 (This is my "patch.4") This patch: 1/ Allows the sendpr_intro_$lc_fieldname callback to modify the lists of fields for that field 2/ Provides a callback (submitnewpr) for the user when the PR is being submitted. I use this to add "" to the list of possible Responsible people, and then remove it if it's still there. This means that my users have the option of overriding the default Responsible Person when the submit a PR. R *** gnatsweb.pl Wed Sep 11 14:12:31 2002 --- /u/dss/cgi-bin/gnatsweb-v4.pl Thu Sep 12 08:58:55 2002 *************** *** 1057,1063 **** # The "intro" provides a way for the site callback to print something # at the top of a given field. ! my $intro = cb("sendpr_intro_$lc_fieldname", $field_number) || ''; print "$_:
\n", fieldinfo($_, 'desc'), --- 1057,1063 ---- # The "intro" provides a way for the site callback to print something # at the top of a given field. ! my $intro = cb("sendpr_intro_$lc_fieldname", $field_number, @values) || ''; print "$_:
\n", fieldinfo($_, 'desc'), *************** *** 1183,1188 **** --- 1183,1190 ---- $val = unparse_multienum(\@val, $key); } $fields{$key} = $val; + + cb("submitnewpr", $key, \%fields); } # Make sure the pr is valid. _______________________________________________ Help-gnats mailing list Help-gnats@gnu.org http://mail.gnu.org/mailman/listinfo/help-gnats