diff options
author | Tony Cook <tony@develop-help.com> | 2010-09-17 19:46:10 +1000 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2010-09-17 19:46:10 +1000 |
commit | 6e4e36585bd590e1069fe6d997fea72d7c46dbb3 (patch) | |
tree | 1838ed79e78b7e1d7c5d1f04e2ab39f50626ecd6 /t | |
parent | 346e4e567b90e9980b46c684af017e17b763fa74 (diff) | |
download | perl-6e4e36585bd590e1069fe6d997fea72d7c46dbb3.tar.gz |
Explicitly disable unicode for non-unicode tests in t/op/warn.t
These would fail when smokes tested under unicode locales.
Diffstat (limited to 't')
-rw-r--r-- | t/op/warn.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/op/warn.t b/t/op/warn.t index b47bd9000f..30dccdf301 100644 --- a/t/op/warn.t +++ b/t/op/warn.t @@ -115,7 +115,7 @@ fresh_perl_like( print STDERR $a; warn $a; ', qr/^\xee(?:\r?\n\xee){3}/, - {}, + { switches => [ "-C0" ] }, 'warn emits logical characters, not internal bytes [perl #45549]' ); @@ -134,7 +134,7 @@ fresh_perl_like( fresh_perl_like( 'warn chr 300', qr/^Wide character in warn .*\n\xc4\xac at /, - {}, + { switches => [ "-C0" ] }, 'Wide character in warn (not print)' ); |