summaryrefslogtreecommitdiff
path: root/source4/selftest/output/html.pm
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2007-12-20 15:54:08 +0100
committerStefan Metzmacher <metze@samba.org>2007-12-21 06:28:48 +0100
commit1ae762d3bc924245aa96378929a9a048d385a61e (patch)
treec8973260f819b45c3a6f65e18eec15350d5977f9 /source4/selftest/output/html.pm
parent70c9374305fdb39ca92b3490bfdbc23043960637 (diff)
downloadsamba-1ae762d3bc924245aa96378929a9a048d385a61e.tar.gz
samba-1ae762d3bc924245aa96378929a9a048d385a61e.tar.bz2
samba-1ae762d3bc924245aa96378929a9a048d385a61e.zip
r26549: Remove suite-specific bits.
(This used to be commit ac01d515b71ce44a0d98e50d58a76e1ce9e1f5d9)
Diffstat (limited to 'source4/selftest/output/html.pm')
-rw-r--r--source4/selftest/output/html.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/source4/selftest/output/html.pm b/source4/selftest/output/html.pm
index 13d2f10938..1e2dacac6f 100644
--- a/source4/selftest/output/html.pm
+++ b/source4/selftest/output/html.pm
@@ -9,13 +9,13 @@ use warnings;
use FindBin qw($RealBin);
-sub new($$$$) {
+sub new$($$$) {
my ($class, $dirname, $statistics) = @_;
my $self = {
dirname => $dirname,
- statistics => $statistics,
active_test => undef,
local_statistics => {},
+ statistics => {},
msg => "",
error_summary => {
skip => [],
@@ -248,7 +248,9 @@ sub summary($)
print INDEX "<tr>\n";
print INDEX " <td class=\"testSuiteTotal\">Total</td>\n";
- if ($st->{SUITES_FAIL} == 0) {
+ if ($st->{TESTS_UNEXPECTED_OK} == 0 and
+ $st->{TESTS_UNEXPECTED_FAIL} == 0 and
+ $st->{TESTS_ERROR} == 0) {
print INDEX " <td class=\"resultOk\">";
} else {
print INDEX " <td class=\"resultFailure\">";