summaryrefslogtreecommitdiff
path: root/source4/selftest/output
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2007-12-11 14:24:20 +0100
committerStefan Metzmacher <metze@samba.org>2007-12-21 05:49:27 +0100
commit78a4f5eadad447cd92f27a5fe4311eceea12f1f9 (patch)
tree744ac9b5429c268324f4ef704c5d56020537346b /source4/selftest/output
parent1ea47faa979ad2e4aa4cf1f4252aa33aef98dbd8 (diff)
downloadsamba-78a4f5eadad447cd92f27a5fe4311eceea12f1f9.tar.gz
samba-78a4f5eadad447cd92f27a5fe4311eceea12f1f9.tar.bz2
samba-78a4f5eadad447cd92f27a5fe4311eceea12f1f9.zip
r26398: Fix writing the output of failed tests to st/summary.
(This used to be commit 34b9ddddaffe67de821a19219bcceec75f9d8fdd)
Diffstat (limited to 'source4/selftest/output')
-rw-r--r--source4/selftest/output/plain.pm11
1 files changed, 8 insertions, 3 deletions
diff --git a/source4/selftest/output/plain.pm b/source4/selftest/output/plain.pm
index 0406ca7d3d..8a56d1c922 100644
--- a/source4/selftest/output/plain.pm
+++ b/source4/selftest/output/plain.pm
@@ -70,6 +70,7 @@ sub end_testsuite($$$$$$)
if ($ret != $expected_ret and $self->{immediate} and not $self->{verbose}) {
$out .= $self->{test_output}->{$name};
+ push (@{$self->{suitesfailed}}, $name);
}
print $out;
@@ -108,6 +109,13 @@ sub summary($)
if ($#{$self->{suitesfailed}} > -1) {
print SUMMARY "= Failed tests =\n";
+
+ foreach (@{$self->{suitesfailed}}) {
+ print SUMMARY "== $_ ==\n";
+ print SUMMARY $self->{test_output}->{$_}."\n\n";
+ }
+
+ print SUMMARY "\n";
}
if (not $self->{immediate} and not $self->{verbose}) {
@@ -116,9 +124,6 @@ sub summary($)
print "FAIL: $_\n";
print $self->{test_output}->{$_};
print "\n";
-
- print SUMMARY "= $_ =\n";
- print SUMMARY $self->{test_output}->{$_}."\n\n";
}
}