diff options
| author | Steve Peters <steve@fisharerojo.org> | 2007-07-23 13:42:24 +0000 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2007-07-23 13:42:24 +0000 |
| commit | 78b7ef0673ed105edd723dec0b27f038e2675cd5 (patch) | |
| tree | 3d57735681d45cef87324a4c06f7e393594e9f9f /t | |
| parent | 9ee2021ee3fd1e0556546f61f666e737203c2154 (diff) | |
| download | perl-78b7ef0673ed105edd723dec0b27f038e2675cd5.tar.gz | |
Various fixes for EBCDIC platforms.
p4raw-id: //depot/perl@31648
Diffstat (limited to 't')
| -rw-r--r-- | t/io/layers.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/t/io/layers.t b/t/io/layers.t index c399b2ad8f..abbc7ecf42 100644 --- a/t/io/layers.t +++ b/t/io/layers.t @@ -131,11 +131,11 @@ SKIP: { [ qw(stdio crlf) ], "open :crlf"); - binmode(F, ":encoding(sjis)"); # "sjis" will be canonized to "shiftjis" + binmode(F, ":encoding(cp1047)"); check([ PerlIO::get_layers(F) ], - [ qw[stdio crlf encoding(shiftjis) utf8] ], - ":encoding(sjis)"); + [ qw[stdio crlf encoding(cp1047) utf8] ], + ":encoding(cp1047)"); binmode(F, ":pop"); |