[Compbench-web-devel] compbenchmarks-web/lib topic.pl,1.1,1.2

[Frederic T. <xf...@us...>]

Update of /cvsroot/compbench/compbenchmarks-web/lib
In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv3007

Modified Files:
	topic.pl 
Log Message:
Better HTML conformance.
Obsolete code removed.

Index: topic.pl
===================================================================
RCS file: /cvsroot/compbench/compbenchmarks-web/lib/topic.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** topic.pl	28 Nov 2006 21:47:55 -0000	1.1
--- topic.pl	29 Nov 2006 19:15:45 -0000	1.2
***************
*** 13,50 ****
  our $req;
  
- sub topic_start_former {
-   my $topics = shift;
-   my $order  = shift;
- 
-   my $first  = 1;
- 
-   if (!defined($topic)) {
-     $topic=$order->[0];
-   }
- 
-   print "<table class='topic'><tr>";
-   print "<td class='topic_active'>Topic : </td>";
- 
-   foreach(@{$order}) {
-     if ($topic ne $_) {
-       print "<td class='topic_inactive'>";
-     } else {
-       print "<td class='topic_active'>";
-     }
-     if (! $first) {
-       print "&nbsp;</td>";
-       if ($topic ne $_) {
- 	print "<td class='topic_inactive'>";
-       } else {
- 	print "<td class='topic_active'>";
-       }
-     }
-     print "<a href='?tab=$tab&amp;topic=$_'>$topics->{$_}</a></td></tr>";
-     $first=0;
-   }
-   print "</table>";
-   print "<h2>$topics->{$topic}</h2>";
- }
- 
  sub topic_start {
    my $topics = shift;
--- 13,16 ----
***************
*** 57,61 ****
    }
  
!   print "<table class='topic' width='100%'><tr><td><table><tr>";
    foreach(@{$order}) {
      if ($topic ne $_) {
--- 23,27 ----
    }
  
!   print "<table class='topic' width='100%' summary='topics'><tr><td><table summary='topic'><tr>";
    foreach(@{$order}) {
      if ($topic ne $_) {