From: Jelmer Vernooij Date: Thu, 11 Jun 2009 22:19:02 +0000 (+0200) Subject: selftest/buildfarm: Don't assume that a reason being specified is an indication of... X-Git-Tag: tdb-1.1.5~61 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b8f36d3eb8d04ec15a53816d78c851868916054f;p=thirdparty%2Fsamba.git selftest/buildfarm: Don't assume that a reason being specified is an indication of failure. --- diff --git a/selftest/output/buildfarm.pm b/selftest/output/buildfarm.pm index 09b84de99eb..8612cfbc76b 100644 --- a/selftest/output/buildfarm.pm +++ b/selftest/output/buildfarm.pm @@ -87,9 +87,16 @@ sub control_msg($$) } } -sub end_testsuite($$$$$$) +sub end_testsuite($$$$$) { - my ($self, $name, $result, $unexpected, $reason) = @_; + my ($self, $name, $result, $reason) = @_; + + my $unexpected; + if ($result eq "failure" or $result eq "fail" or $result eq "error") { + $unexpected = 1; + } else { + $unexpected = 0; + } BuildFarm::end_testsuite($name, ($self->{last_time} - $self->{START_TIME}), (not $unexpected), $self->{test_output}->{$name},