diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2008-04-16 00:03:45 +0200 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2008-04-16 00:03:45 +0200 |
commit | 92873264d707bed88beac54a73a29d66c011f80c (patch) | |
tree | 43cb3123614c03f6ec768ae644bdbad40f8cca47 /source/selftest | |
parent | ad58a508542bd93115be0ad826fb93aa3d349658 (diff) | |
download | samba-92873264d707bed88beac54a73a29d66c011f80c.tar.gz |
Properly warn about exit codes that indicate success while tests claim
failure.
Diffstat (limited to 'source/selftest')
-rw-r--r-- | source/selftest/output/plain.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/source/selftest/output/plain.pm b/source/selftest/output/plain.pm index 25ff74792e5..f14e26b38d4 100644 --- a/source/selftest/output/plain.pm +++ b/source/selftest/output/plain.pm @@ -81,6 +81,9 @@ sub end_testsuite($$$$$) my $out = ""; if ($unexpected) { + if ($result eq "success" and not defined($reason)) { + $reason = "Expected negative exit code, got positive exit code"; + } $self->output_msg("ERROR: $reason\n"); push (@{$self->{suitesfailed}}, $name); } else { |