diff options
Diffstat (limited to 'globals.pl')
| -rw-r--r-- | globals.pl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/globals.pl b/globals.pl index 55888d7e7..f3288e8c8 100644 --- a/globals.pl +++ b/globals.pl @@ -235,10 +235,16 @@ sub GenerateVersionTable { my $dotargetmilestone = Param("usetargetmilestone"); my $mpart = $dotargetmilestone ? ", milestoneurl" : ""; - SendSQL("select product, description$mpart from products"); + SendSQL("select product, description, disallownew$mpart from products"); while (@line = FetchSQLData()) { - my ($p, $d, $u) = (@line); + my ($p, $d, $dis, $u) = (@line); $::proddesc{$p} = $d; + if ($dis) { + # Special hack. Stomp on the description and make it "0" if we're + # not supposed to allow new bugs against this product. This is + # checked for in enter_bug.cgi. + $::proddesc{$p} = "0"; + } if ($dotargetmilestone) { $::milestoneurl{$p} = $u; } |