You are viewing a plain text version of this content. The canonical link for it is here.
Posted to cvs@httpd.apache.org by co...@hyperreal.org on 1998/08/01 11:45:58 UTC
cvs commit: apache-site bugdb.cgi
coar 98/08/01 02:45:58
Modified: . bugdb.cgi
Log:
For large summaries, the rendering of the page needed to wait until
the entire page was received; for slow links this was a pain. So,
as Paul suggested, the output is now broken up into 100-row tables.
I also added a note about 'don't send attachments, twit!' to the
how-to-reply section; attachments don't mix so well with non-MIME
tools like GNATS..
Revision Changes Path
1.33 +35 -16 apache-site/bugdb.cgi
Index: bugdb.cgi
===================================================================
RCS file: /export/home/cvs/apache-site/bugdb.cgi,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -r1.32 -r1.33
--- bugdb.cgi 1998/07/27 22:39:25 1.32
+++ bugdb.cgi 1998/08/01 09:45:57 1.33
@@ -19,6 +19,10 @@
[you need to include <ap...@Apache.Org> in the Cc line ]
[and leave the subject line UNCHANGED. This is not done]
[automatically because of the potential for mail loops. ]
+[If you do not include this Cc, your reply may be ig- ]
+[nored unless you are responding to an explicit request ]
+[from a developer. ]
+[Reply only with text; DO NOT SEND ATTACHMENTS! ]
EOT
#
@@ -127,6 +131,9 @@
# 05/28/1998 Ken Coar - Change the 'still alive?' standard response to include
# a request for retesting under the latest sotware.
# 07/27/1998 Ken Coar - Change the default search state from "open" to "any".
+# 08/01/1998 Ken Coar - Break summary listing into 100-row tables for
+# faster rendering and add 'don't send attachments' clause to the
+# how-to-reply text.
#
### End Modification log
@@ -264,7 +271,7 @@
### Main menu
} elsif ($PATH_INFO eq "") {
&main_menu();
- print "<HR><SMALL>Version: 28 May 1998<BR>Authors: ",
+ print "<HR><SMALL>Version: 01 August 1998<BR>Authors: ",
"<A HREF=\"http://alumni.caltech.edu/~dank/gnats.html\">Dan Kegel ",
"and Huy Le</A>, <BR> ",
"with revamp work by ",
@@ -1258,21 +1265,8 @@
print "<h3>No bugs match your query.</h3>\n";
return;
}
- print "<TABLE BORDER=1>\n<TR>\n";
- # Print field headers.
- local($QUICKFMT, $WIDTH, $fstring, $str);
- $fstring = "<TH>PR#</TH>";
- foreach (@field) {
- ($QUICKFMT, $WIDTH)=split(/:/,$field{$_});
- if ($QUICKFMT <= $quickfmt) {
-# $fstring .= &truncstr($_, $WIDTH) . " ";
- $fstring .= "<TH>$_</TH> ";
- }
- }
- if ($#field > 4) {
- $fstring .= "<TH>PR#</TH>";
- }
- print "$fstring</TR>\n";
+ &qf_tabletop (%field);
+ local ($nrows) = 0;
# Print each PR in result as link to full text
foreach (@prs) {
s/\s*\|\s*/|/go;
@@ -1307,6 +1301,11 @@
$fstring .= "<TD>" . &html_escape($str) . "</TD>";
}
}
+ if (($nrows % 100) == 0) {
+ print "</TABLE>\n<P>\n</P>\n" if ($nrows != 0);
+ &qf_tabletop (%field);
+ }
+ $nrows++;
print "<TR>\n";
print " <TD><a href=http:$SCRIPT_NAME/full/$NUMBER>$NUMBER</a></TD> ";
print "$fstring\n";
@@ -1316,6 +1315,26 @@
print "\n</TR>\n";
}
print "</table>\n";
+}
+
+sub qf_tabletop {
+ local (%field) = @_;
+ local ($QUICKFMT, $WIDTH, $fstring, $str);
+
+ print "<TABLE BORDER=1>\n<TR>\n";
+ # Print field headers.
+ $fstring = "<TH>PR#</TH>";
+ foreach (@field) {
+ ($QUICKFMT, $WIDTH) = split(/:/, $field{$_});
+ if ($QUICKFMT <= $quickfmt) {
+# $fstring .= &truncstr($_, $WIDTH) . " ";
+ $fstring .= "<TH>$_</TH> ";
+ }
+ }
+ if ($#field > 4) {
+ $fstring .= "<TH>PR#</TH>";
+ }
+ print "$fstring</TR>\n";
}
sub query_summary {