diff options
Diffstat (limited to 'selftest/output/plain.pm')
| -rw-r--r-- | selftest/output/plain.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/selftest/output/plain.pm b/selftest/output/plain.pm index 26056038f5..509e066910 100644 --- a/selftest/output/plain.pm +++ b/selftest/output/plain.pm @@ -65,7 +65,11 @@ sub start_testsuite($$) $self->{test_output}->{$name} = "" unless($self->{verbose}); my $out = ""; - $out .= "[$self->{index}/$self->{totalsuites} in ".$duration."s"; + $out .= "[$self->{index}"; + if ($self->{totalsuites}) { + $out .= "/$self->{totalsuites}"; + } + $out.= " in ".$duration."s"; $out .= sprintf(", %d errors", ($#{$self->{suitesfailed}}+1)) if ($#{$self->{suitesfailed}} > -1); $out .= "] $name"; if ($self->{immediate}) { |