diff options
Diffstat (limited to 't/pragma/subs.t')
| -rwxr-xr-x | t/pragma/subs.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/pragma/subs.t b/t/pragma/subs.t index 58b53ae293..4a6f09b639 100755 --- a/t/pragma/subs.t +++ b/t/pragma/subs.t @@ -55,9 +55,9 @@ for (@prgs){ # allow expected output to be written as if $prog is on STDIN $results =~ s/tmp\d+/-/g; $results =~ s/\n%[A-Z]+-[SIWEF]-.*$// if $Is_VMS; # clip off DCL status msg -# bison says 'parser error' instead of 'syntax error', +# bison says 'parse error' instead of 'syntax error', # various yaccs may or may not capitalize 'syntax'. - $results =~ s/^(syntax|parser) error/\L$1 error/i; + $results =~ s/^(syntax|parse) error/syntax error/mi; $expected =~ s/\n+$//; my $prefix = ($results =~ s/^PREFIX\n//) ; if ( $results =~ s/^SKIPPED\n//) { |