diff options
Diffstat (limited to 'reports.cgi')
-rwxr-xr-x | reports.cgi | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/reports.cgi b/reports.cgi index 41614773d..9fe4413b4 100755 --- a/reports.cgi +++ b/reports.cgi @@ -711,10 +711,15 @@ sub most_recently_doomed # sort people by the number of bugs they have assigned to this milestone @people = sort bybugs @people; my $totalpeople = @people; + + if ($totalpeople > 20) { + splice @people, 0, $totalpeople-20; + } print "<TABLE>\n"; print "<TR><TD COLSPAN=2>\n"; print "$totalpeople engineers have $bugtotal untouched new bugs.\n"; + print "These are the 20 most doomed."; print "</TD></TR>\n"; while (@people) |