summaryrefslogtreecommitdiff
path: root/selftest
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2009-06-12 00:19:02 +0200
committerJelmer Vernooij <jelmer@samba.org>2009-06-12 00:22:39 +0200
commitb8f36d3eb8d04ec15a53816d78c851868916054f (patch)
tree7072c668a6a371529047a9524b419a1d5db0df2e /selftest
parent8fc36025821614bce8a828734c06161c2b39577e (diff)
downloadsamba-b8f36d3eb8d04ec15a53816d78c851868916054f.tar.gz
samba-b8f36d3eb8d04ec15a53816d78c851868916054f.tar.bz2
samba-b8f36d3eb8d04ec15a53816d78c851868916054f.zip
selftest/buildfarm: Don't assume that a reason being specified is an indication of failure.
Diffstat (limited to 'selftest')
-rw-r--r--selftest/output/buildfarm.pm11
1 files changed, 9 insertions, 2 deletions
diff --git a/selftest/output/buildfarm.pm b/selftest/output/buildfarm.pm
index 09b84de99e..8612cfbc76 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},