sg-report-job-history: Colour host column according to whether it changes

Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>
Acked-by: Ian Campbell <ian.campbell@citrix.com>

diff --git a/sg-report-job-history b/sg-report-job-history
index 11fdaafe76d3e77a7c3d931e18f7e60509486161..9a6e17b500e46f0bc8e0eadc8c08f2cb2723b194 100755 (executable)
--- a/sg-report-job-history
+++ b/sg-report-job-history
@@ -232,6 +232,7 @@ END
         my $alternate= 0;
         my @last_revs;
         my @alt_revs;
+        my $alt_hosts;
         foreach my $r (@test_rows) {
             my $altcolour= report_altcolour($alternate);
             print H "<tr $altcolour>";
@@ -249,7 +250,8 @@ END
                 $r->{Content}."</a></td>\n";
             my $lastrev;
             my $hosts = join ", ", map { $_ // "-" } @{ $r->{Hosts} };
-            print H "<td>".encode_entities($hosts)."</td>\n";
+            my $hosts_colour = report_altchangecolour(\$alt_hosts, $hosts);
+            print H "<td $hosts_colour>".encode_entities($hosts)."</td>\n";
             $osstestverq->execute($r->{Flight}{flight});
             print H
                 "<td>",