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 /ext/Encode | |
| parent | 9ee2021ee3fd1e0556546f61f666e737203c2154 (diff) | |
| download | perl-78b7ef0673ed105edd723dec0b27f038e2675cd5.tar.gz | |
Various fixes for EBCDIC platforms.
p4raw-id: //depot/perl@31648
Diffstat (limited to 'ext/Encode')
| -rw-r--r-- | ext/Encode/t/mime_header_iso2022jp.t | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/ext/Encode/t/mime_header_iso2022jp.t b/ext/Encode/t/mime_header_iso2022jp.t index bc26b9eec8..f1be86494d 100644 --- a/ext/Encode/t/mime_header_iso2022jp.t +++ b/ext/Encode/t/mime_header_iso2022jp.t @@ -1,5 +1,11 @@ -use Test::More tests => 14; +use Test::More; + +if( ord("A") == 193 ) { + plan skip_all => 'No Encode::MIME::Header::ISO_2022_JP on EBCDIC Platforms'; +} else { + plan tests => 14; +} use strict; use Encode; |