From: František Dvořák Date: Sun, 11 Mar 2012 19:20:43 +0000 (+0100) Subject: Better fix. X-Git-Url: http://scientific.zcu.cz/git/?a=commitdiff_plain;h=bfba7974160d22dee54cc797ae1d3ea508984449;p=meta-dashboard.git Better fix. --- diff --git a/dashboard.pl b/dashboard.pl index 5270d3b..ff18e87 100755 --- a/dashboard.pl +++ b/dashboard.pl @@ -73,8 +73,8 @@ foreach my $s (keys %list) { $result=`grep -- '-TEST FAILED-' $item->{dir}/report.twiki 2>/dev/null| wc -l | sed 's/ *//g'`; chomp $result; } else { - if ($section == 0) { $result = 'Error'; } - else { $result = 'Failed'; } + if ($section == 0) { $result = 'Error'; } + else { $result = 'Failed'; } } } else { undef $result; } $item->{result} = defined $result ? $result : '-'; @@ -209,8 +209,9 @@ print qq( if ($item->{result} eq '0') { $class='OK'; } else { $class='FAIL'; } - if ( $item->{result} == "0" ) { $result="$item->{result} error"; } - else { $result="$item->{result} errors"; } + if ( $item->{result} eq '1' ) { $result="$item->{result} error"; } + elsif ($item->{result} =~ /^[0-9]+$/) { $result="$item->{result} errors"; } + else { $result = "$item->{result}"; } print " $item->{date}
{dir}/\">$result\n"; } else { @@ -219,9 +220,13 @@ print qq( $item = $list{upgrade}{$c}{$p}; if (defined $item) { - $result = $item->{result}; if ($item->{result} eq '0') { $class='OK'; } else { $class='FAIL'; } + + if ( $item->{result} eq '1' ) { $result="$item->{result} error"; } + elsif ($item->{result} =~ /^[0-9]+$/) { $result="$item->{result} errors"; } + else { $result = "$item->{result}"; } + print " $item->{date}
{dir}/\">$result\n"; } else { print " \n"