projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
130fdcc
)
Silence ill-behaved Test::Harness test on VMS.
author
Craig A. Berry
<craigberry@mac.com>
Fri, 16 Nov 2007 23:47:45 +0000
(23:47 +0000)
committer
Craig A. Berry
<craigberry@mac.com>
Fri, 16 Nov 2007 23:47:45 +0000
(23:47 +0000)
p4raw-id: //depot/perl@32353
lib/Test/Harness/t/failure.t
patch
|
blob
|
history
diff --git
a/lib/Test/Harness/t/failure.t
b/lib/Test/Harness/t/failure.t
index
9505532
..
76d8dc9
100644
(file)
--- a/
lib/Test/Harness/t/failure.t
+++ b/
lib/Test/Harness/t/failure.t
@@
-1,6
+1,13
@@
#!/usr/bin/perl -w
BEGIN {
+ if ($^O eq 'VMS') {
+ print '1..0 # Child test output confuses parent test counter';
+ exit;
+ }
+}
+
+BEGIN {
if ( $ENV{PERL_CORE} ) {
chdir 't';
@INC = ('../lib', 'lib');