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:
@@ -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>
|
||||
|
||||
Reference in New Issue
Block a user