fix t/op/misc.t for VMS
Craig A. Berry [Fri, 3 Aug 2001 16:16:16 +0000 (11:16 -0500)]
Message-Id: <5.1.0.14.0.20010803161026.03530e58@exchi01>

p4raw-id: //depot/perl@11566

t/op/misc.t

index b00f4b1..86c8162 100755 (executable)
@@ -48,6 +48,7 @@ for (@prgs){
 # 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";