Added new "products" table, which contains a description for each

product.  This description is presented when the user is entering a
new bug.

1 files changed, 8 insertions, 0 deletions

diff --git a/globals.pl b/globals.pl
index 56916f980..4c5975055 100644
--- a/globals.pl
+++ b/globals.pl
@@ -235,6 +235,13 @@ sub GenerateVersionTable {
         $carray{$c} = 1;
     }
 
+    SendSQL("select product, description from products");
+    while (@line = FetchSQLData()) {
+        my ($p, $d) = (@line);
+        $::proddesc{$p} = $d;
+    }
+            
+
     my $cols = LearnAboutColumns("bugs");
     
     @::log_columns = @{$cols->{"-list-"}};
@@ -280,6 +287,7 @@ sub GenerateVersionTable {
                   'bug_status', 'resolution', 'resolution_no_dup') {
         print FID GenerateCode('@::legal_' . $i);
     }
+    print FID GenerateCode('%::proddesc');
 
     print FID "1;\n";
     close FID;