User: knarf Date: 2010/06/16 07:53 PM
Modified: /release-info/ parse_testsuite_results.cgi
Log: reorder
File Changes:
Directory: /release-info/ =========================
File [modified]: parse_testsuite_results.cgi Delta lines: +9 -6 =================================================================== --- release-info/parse_testsuite_results.cgi 2010-06-16 23:20:10 UTC (rev 256) +++ release-info/parse_testsuite_results.cgi 2010-06-17 00:53:50 UTC (rev 257) @@ -127,7 +127,7 @@ $table_entries .= "</tr>\n"; $tr="<tr>"; } } -$table_entries .= "<tr><th rowspan='5' colspan='2'>Total failing</th>"; +$table_entries .= "<tr><th rowspan='3' colspan='2'> </th>"; foreach my $host (sort(keys(%allhosts))) { $table_entries .= "<th colspan='".scalar(keys(%{$allhosts{$host}}))."'>$host</th>"; } @@ -148,26 +148,29 @@ $allhosts{$host}{$nprocs}{"ran"}."</td>"; } } -$table_entries .= "</tr><tr>\n"; +my $table_entries_h = "<tr><th rowspan='2'>Totals</th>"; +$table_entries_h .= "</tr><tr><td>Failing</td>\n"; foreach my $host (sort(keys(%allhosts))) { foreach my $nprocs (sort(keys(%{$allhosts{$host}}))) { my $color = " style="background-color:#d0d0d0;""; if ($nprocs != "1") { $color = " style="background-color:#e0e0e0;""; } - $table_entries .= "<td$color align='center' valign='bottom'>". + $table_entries_h .= "<td$color align='center' valign='bottom'>". "<img src='red.png' alt='fail' width='20px' height='". $allhosts{$host}{$nprocs}{"fail"}."px'/></td>\n"; } } -$table_entries .= "</tr><tr>\n"; +$table_entries_h .= "</tr><tr><td>Succeeding</th>\n"; foreach my $host (sort(keys(%allhosts))) { foreach my $nprocs (sort(keys(%{$allhosts{$host}}))) { my $color = " style="background-color:#d0d0d0;""; if ($nprocs != "1") { $color = " style="background-color:#e0e0e0;""; } - $table_entries .= "<td$color align='center' valign='top'>". + $table_entries_h .= "<td$color align='center' valign='top'>". "<img src='green.png' alt='success' width='20px' height='". $allhosts{$host}{$nprocs}{"success"}."px'/></td>\n"; } } -$table_entries .= "</tr>\n"; +$table_entries_h .= "</tr>\n";
+$table_entries = $table_entries_h . $table_entries; + print "<table border='1'>$table_entries</table>\n";