Wow. Turns out this stuff would only handle 10 products. Did the

cheap fix that lets it handle 1000 products.

diff --git a/doeditcomponents.cgi b/doeditcomponents.cgi
index 7e8cc494c9e24eefaed7ce183c68561a684b13e7..bfe09e93df9fee95dbfc71d2cfa48cecf85740c8 100755 (executable)
--- a/doeditcomponents.cgi
+++ b/doeditcomponents.cgi
@@ -93,7 +93,7 @@ PutHeader("Saving new component info");
 unlink "data/versioncache";
 GetVersionTable();
 
-my $prodcode = "P0";
+my $prodcode = "P000";
 
 foreach my $product (@::legal_product) {
     SendSQL("select description, milestoneurl, disallownew from products where product='$product'");

diff --git a/editcomponents.cgi b/editcomponents.cgi
index 1de25992495648e0f41994b6453755e9a7ebe2d5..a7e1e660edf6c985951db4ee09336764a4fa13f4 100755 (executable)
--- a/editcomponents.cgi
+++ b/editcomponents.cgi
@@ -56,7 +56,7 @@ my $rowbreak = "<tr><td colspan=2><hr></td></tr>";
 unlink "data/versioncache";
 GetVersionTable();
 
-my $prodcode = "P0";
+my $prodcode = "P000";
 
 foreach my $product (@::legal_product) {
     SendSQL("select description, milestoneurl, disallownew from products where product='$product'");