diff options
Diffstat (limited to 'source4/selftest/output/plain.pm')
| -rw-r--r-- | source4/selftest/output/plain.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/source4/selftest/output/plain.pm b/source4/selftest/output/plain.pm index bbf0f8f414..2cb510b7e8 100644 --- a/source4/selftest/output/plain.pm +++ b/source4/selftest/output/plain.pm @@ -77,9 +77,15 @@ sub start_test($$) my ($state, $testname) = @_; } -sub end_test($$$$$) +sub end_test($$$$$$) { - my ($state, $testname, $result, $unexpected, $reason) = @_; + my ($self, $state, $testname, $result, $unexpected, $reason) = @_; + + if ($unexpected and $self->{immediate} and not $self->{verbose}) { + print "$testname: $result [ $reason ]\n"; + print $self->{test_output}->{$state->{NAME}}."\n"; + } + $self->{test_output}->{$state->{NAME}} = ""; } sub summary($) |