diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2009-06-05 16:55:45 +0200 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2009-06-11 19:59:59 +0200 |
commit | d8a77a798b5c691c76fcbadbc41c97ff1c9922f3 (patch) | |
tree | 949e80dade2618002b36173be2082c833ce3909b /selftest/output | |
parent | 2e311fdac56f43998bb192418f617e6e7a6fc320 (diff) | |
download | samba-d8a77a798b5c691c76fcbadbc41c97ff1c9922f3.tar.gz samba-d8a77a798b5c691c76fcbadbc41c97ff1c9922f3.tar.xz samba-d8a77a798b5c691c76fcbadbc41c97ff1c9922f3.zip |
selftest: Properly recognize xfail testsuites.
Diffstat (limited to 'selftest/output')
-rw-r--r-- | selftest/output/buildfarm.pm | 3 | ||||
-rw-r--r-- | selftest/output/plain.pm | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/selftest/output/buildfarm.pm b/selftest/output/buildfarm.pm index 95c5423383b..bd21fc683dc 100644 --- a/selftest/output/buildfarm.pm +++ b/selftest/output/buildfarm.pm @@ -86,6 +86,9 @@ sub end_testsuite($$$$$$) BuildFarm::end_testsuite($name, ($self->{last_time} - $self->{START_TIME}), (not $unexpected), $self->{test_output}->{$name}, $reason); + if ($result ne "success") { + $self->{statistics}->{SUITES_FAIL}++; + } } sub start_test($$$) diff --git a/selftest/output/plain.pm b/selftest/output/plain.pm index bfdced29364..5e75ce95119 100644 --- a/selftest/output/plain.pm +++ b/selftest/output/plain.pm @@ -125,7 +125,7 @@ sub end_testsuite($$$$) } if (not $self->{immediate}) { - if (not $unexpected) { + unless($unexpected) { $out .= " ok\n"; } else { $out .= " " . uc($result) . "\n"; |