Change 11566 by jhi@alpha on 2001/08/03 20:45:10
Subject: [PATCH perl@11564] fix t/op/misc.t for VMS
From: "Craig A. Berry" <[EMAIL PROTECTED]>
Date: Fri, 03 Aug 2001 16:16:16 -0500
Message-Id: <5.1.0.14.0.20010803161026.03530e58@exchi01>
Affected files ...
... //depot/perl/t/op/misc.t#76 edit
Differences ...
==== //depot/perl/t/op/misc.t#76 (xtext) ====
Index: perl/t/op/misc.t
--- perl/t/op/misc.t.~1~ Fri Aug 3 15:00:05 2001
+++ perl/t/op/misc.t Fri Aug 3 15:00:05 2001
@@ -48,6 +48,7 @@
# bison says 'parse error' instead of 'syntax error',
# various yaccs may or may not capitalize 'syntax'.
$results =~ s/^(syntax|parse) error/syntax error/mig;
+ $results =~ s/\n\n/\n/ if $^O eq 'VMS'; # pipes double these sometimes
$expected =~ s/\n+$//;
if ( $results ne $expected ) {
print STDERR "PROG: $switch\n$prog\n";
End of Patch.
