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".

1 files changed, 12 insertions, 0 deletions

diff --git a/globals.pl b/globals.pl
index e6f426af8..63998f859 100644
--- a/globals.pl
+++ b/globals.pl
@@ -336,6 +336,18 @@ sub GenerateVersionTable {
         print FID GenerateCode('@::legal_target_milestone');
         print FID GenerateCode('%::milestoneurl');
     }
+
+    SendSQL("SELECT id, name FROM keyworddefs ORDER BY name");
+    while (MoreSQLData()) {
+        my ($id, $name) = FetchSQLData();
+        $::keywordsbyid{$id} = $name;
+        $::keywordsbyname{$name} = $id;
+        push(@::legal_keywords, $name);
+    }
+    print FID GenerateCode('@::legal_keywords');
+    print FID GenerateCode('%::keywordsbyname');
+    print FID GenerateCode('%::keywordsbyid');
+
     print FID "1;\n";
     close FID;
     rename $tmpname, "data/versioncache" || die "Can't rename $tmpname to versioncache";