From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sun, 29 Jun 2003 10:17:28 +0000 (+0000)
Subject: More coffee...
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c4b2e1b65d11779e63c2d42d6b840c9078181338;p=p5sagit%2Fp5-mst-13.2.git

More coffee...

p4raw-id: //depot/perl@19881
---

diff --git a/lib/Test/Harness.pm b/lib/Test/Harness.pm
index b6a46d3..4023279 100644
--- a/lib/Test/Harness.pm
+++ b/lib/Test/Harness.pm
@@ -523,7 +523,7 @@ sub _run_all_tests {
                 $failedtests{$tfile}{name} = $tfile;
             }
             elsif($results{seen}) {
-                if (@{$test{failed}} and $test{$max}) {
+                if (@{$test{failed}} and $test{max}) {
                     my ($txt, $canon) = canonfailed($test{max},$test{skipped},
                                                     @{$test{failed}});
                     print "$test{ml}$txt";