Patch by Klaas Freitag <freitag@suse.de>, with modifications by me --

don't generate HTML tables with more than 50 lines, as browsers generally
can't cope with huge tables.


git-svn-id: svn://10.0.0.236/trunk@58402 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
terry%mozilla.org
2000-01-22 16:51:49 +00:00
parent b0244ed153
commit 44682785ae
2 changed files with 21 additions and 2 deletions

View File

@@ -125,7 +125,7 @@ my $action = trim($::FORM{action} || '');
if ($action eq "") {
PutHeader("Select keyword");
print qq{
my $tableheader = qq{
<TABLE BORDER=1 CELLPADDING=4 CELLSPACING=0>
<TR BGCOLOR="#6666FF">
<TH ALIGN="left">Edit keyword ...</TH>
@@ -134,6 +134,10 @@ if ($action eq "") {
<TH ALIGN="left">Action</TH>
</TR>
};
print $tableheader;
my $line_count = 0;
my $max_table_size = 50;
SendSQL("SELECT keyworddefs.id, keyworddefs.name, keyworddefs.description,
COUNT(keywords.bug_id), keywords.bug_id
FROM keyworddefs LEFT JOIN keywords ON keyworddefs.id = keywords.keywordid
@@ -151,6 +155,12 @@ if ($action eq "") {
# what it had responded.
$bugs = 'none';
}
if ($line_count == $max_table_size) {
print "</table>\n$tableheader";
$line_count = 0;
}
$line_count++;
print qq{
<TR>
<TH VALIGN="top"><A HREF="editkeywords.cgi?action=edit&id=$id">$name</TH>