diff options
Diffstat (limited to 'source4/selftest/output/plain.pm')
| -rw-r--r-- | source4/selftest/output/plain.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/source4/selftest/output/plain.pm b/source4/selftest/output/plain.pm index d3ffe228a7..2aa01145d0 100644 --- a/source4/selftest/output/plain.pm +++ b/source4/selftest/output/plain.pm @@ -88,7 +88,13 @@ sub summary($) } } - print "FAILED ($self->{statistics}->{TESTS_UNEXPECTED_FAIL} failures and $self->{statistics}->{TESTS_ERROR} errors in $self->{statistics}->{SUITES_FAIL} testsuites)\n"; + if ($self->{statistics}->{SUITES_FAIL} == 0) { + my $ok = $self->{statistics}->{TESTS_EXPECTED_OK} + + $self->{statistics}->{TESTS_EXPECTED_FAIL}; + print "ALL OK ($ok tests in $self->{statistics}->{SUITES_OK} testsuites)\n"; + } else { + print "FAILED ($self->{statistics}->{TESTS_UNEXPECTED_FAIL} failures and $self->{statistics}->{TESTS_ERROR} errors in $self->{statistics}->{SUITES_FAIL} testsuites)\n"; + } } sub missing_env($$$) |