From c6f80310afc00cf7d5114e638cbaaefde3914da0 Mon Sep 17 00:00:00 2001
From: "terry%mozilla.org" <>
Date: Fri, 8 Oct 1999 06:54:47 +0000
Subject: Added the ability for users to "vote" on which bugs they think should
 be fixed.

---
 editcomponents.cgi | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'editcomponents.cgi')

diff --git a/editcomponents.cgi b/editcomponents.cgi
index a7e1e660e..e4b6a23de 100755
--- a/editcomponents.cgi
+++ b/editcomponents.cgi
@@ -59,12 +59,12 @@ GetVersionTable();
 my $prodcode = "P000";
 
 foreach my $product (@::legal_product) {
-    SendSQL("select description, milestoneurl, disallownew from products where product='$product'");
+    SendSQL("select description, milestoneurl, disallownew, votesperuser from products where product='$product'");
     my @row = FetchSQLData();
     if (!@row) {
         next;
     }
-    my ($description, $milestoneurl, $disallownew) = (@row);
+    my ($description, $milestoneurl, $disallownew, $votesperuser) = (@row);
     $prodcode++;
     print "<input type=hidden name=prodcode-$prodcode value=\"" .
         value_quote($product) . "\">\n";
@@ -77,6 +77,9 @@ foreach my $product (@::legal_product) {
         print "<td><input size=80 name=$prodcode-milestoneurl value=\"" .
             value_quote($milestoneurl) . "\"></td></tr>\n";
     }
+    print qq{<tr><th align=right>Maximum votes per user:</th><td>\n};
+    print qq{<input size=10 name=$prodcode-votesperuser value=$votesperuser>};
+    print qq{</td></tr>\n};
     my $check0 = !$disallownew ? " SELECTED" : "";
     my $check1 = $disallownew ? " SELECTED" : "";
     print "<tr><td colspan=2><select name=$prodcode-disallownew>\n";
-- 
cgit v1.2.3-24-g4f1b