From 397beebc19dfac0417a64fdbcfb4e6657f6ad9f5 Mon Sep 17 00:00:00 2001 From: "terry%mozilla.org" <> Date: Fri, 7 Jan 2000 05:16:13 +0000 Subject: Add support for a new "keywords" feature. This lets some central authority maintain a list of keywords, and users can associate any keyword with any bug. The new functionality won't appear until at least one keyword is defined. Note that you *must* run the "checksetup.pl" script after updating this change, in order to create the new required tables "keywords" and "keyworddefs". --- bug_form.pl | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) (limited to 'bug_form.pl') diff --git a/bug_form.pl b/bug_form.pl index 3d7179d78..63db92d02 100644 --- a/bug_form.pl +++ b/bug_form.pl @@ -37,6 +37,7 @@ sub bug_form_pl_sillyness { $zz = @::legal_priority; $zz = @::legal_resolution_no_dup; $zz = @::legal_severity; + $zz = @::keywordsbyname; } my %knownattachments; @@ -329,6 +330,24 @@ if (Param("usestatuswhiteboard")) { "; } +if (@::legal_keywords) { + SendSQL("SELECT keyworddefs.name + FROM keyworddefs, keywords + WHERE keywords.bug_id = $id AND keyworddefs.id = keywords.keywordid + ORDER BY keyworddefs.name"); + my @list; + while (MoreSQLData()) { + push(@list, FetchOneColumn()); + } + my $value = value_quote(join(',', @list)); + print qq{ + +Keywords: + + +}; +} + print "Attachments:\n"; SendSQL("select attach_id, creation_ts, description from attachments where bug_id = $id"); while (MoreSQLData()) { -- cgit v1.2.3-24-g4f1b