diff options
| author | David Mitchell <davem@iabyn.com> | 2011-12-13 12:17:00 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2012-06-13 13:32:47 +0100 |
| commit | 788ee426f44f4657b1a125e7bd4c2696354d79b1 (patch) | |
| tree | 11a217893ef351c55188dd04af5da29b847b369e /ext | |
| parent | 3c13cae629d936c43bca9d992cc445d93287af8e (diff) | |
| download | perl-788ee426f44f4657b1a125e7bd4c2696354d79b1.tar.gz | |
fix =/== typo in ext/re/t/regop.t
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/re/t/regop.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/re/t/regop.t b/ext/re/t/regop.t index e3ead69cfe..27d3479c97 100644 --- a/ext/re/t/regop.t +++ b/ext/re/t/regop.t @@ -14,7 +14,7 @@ our $NUM_SECTS; chomp(my @strs= grep { !/^\s*\#/ } <DATA>); my $out = runperl(progfile => "t/regop.pl", stderr => 1 ); # VMS currently embeds linefeeds in the output. -$out =~ s/\cJ//g if $^O = 'VMS'; +$out =~ s/\cJ//g if $^O == 'VMS'; my @tests = grep { /\S/ } split /(?=Compiling REx)/, $out; # on debug builds we get an EXECUTING... message in there at the top shift @tests |