[Commits] [svn:einsteintoolkit] www/release-info/ (Rev. 235)

[knarf at cct.lsu.edu]

User: knarf
Date: 2010/06/16 01:56 PM

Modified:
 /release-info/
  parse_testsuite_results.cgi

Log:
 fix bug

File Changes:

Directory: /release-info/
=========================

File [modified]: parse_testsuite_results.cgi
Delta lines: +8 -4
===================================================================
--- release-info/parse_testsuite_results.cgi	2010-06-16 18:55:34 UTC (rev 234)
+++ release-info/parse_testsuite_results.cgi	2010-06-16 18:56:27 UTC (rev 235)
@@ -134,15 +134,19 @@
 $table_entries .= "</tr>\n<tr>";
 foreach my $host (sort(keys(%allhosts))) {
   foreach my $nprocs (sort(keys(%{$allhosts{$host}}))) {
-    $table_entries .= "<th>$nprocs</th>";
+    my $color = " style=\"background-color:#d0d0d0;\"";
+    if ($nprocs != "1") { $color = " style=\"background-color:#e0e0e0;\""; }
+    $table_entries .= "<th$color>$nprocs</th>";
   }
 }
 $table_entries .= "</tr>\n";
 foreach my $host (sort(keys(%allhosts))) {
   foreach my $nprocs (sort(keys(%{$allhosts{$host}}))) {
-    $table_entries .= "<td>(".$allhosts{$host}{$nprocs}{"success"}."/<b>".
-                              $allhosts{$host}{$nprocs}{"fail"}."</b>)/".
-                              $allhosts{$host}{$nprocs}{"ran"}."</td>";
+    my $color = " style=\"background-color:#d0d0d0;\"";
+    if ($nprocs != "1") { $color = " style=\"background-color:#e0e0e0;\""; }
+    $table_entries .= "<td$color>(".$allhosts{$host}{$nprocs}{"success"}."/<b>".
+                                    $allhosts{$host}{$nprocs}{"fail"}."</b>)/".
+                                    $allhosts{$host}{$nprocs}{"ran"}."</td>";
   }
 }
 $table_entries .= "</tr>\n";