Re: relaxing TEST restrictions (was: Re: 5.9.3 approaches)

Message-ID: <20060109143825.GB4132@efn.org>

p4raw-id: //depot/perl@26757

diff --git a/t/TEST b/t/TEST
index 59c8fa5..9cb6652 100755 (executable)
--- a/t/TEST
+++ b/t/TEST
@@ -481,6 +481,9 @@ EOT
                        die "FAILED--Further testing stopped" . ($1 ? ": $1\n" : ".\n");
                    }
                    else {
+                       # module tests are allowed extra output,
+                       # because Test::Harness allows it
+                       next if $test =~ /^\W*(ext|lib)\b/;
                        $failure = "FAILED--unexpected output at test $next";
                        last;
                    }