diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-28 16:58:11 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-28 16:58:11 +0000 |
| commit | 3ba0e062b0fe667e151870a45d4ee2ea831cfb50 (patch) | |
| tree | f6b4faaa4299b13bf5222e030e8d0f9dc82d7cf0 /t/io/utf8.t | |
| parent | 1115139db3eaa371c914ed4ef12a3a4846e77705 (diff) | |
| download | perl-3ba0e062b0fe667e151870a45d4ee2ea831cfb50.tar.gz | |
Various buglets shaken out by -Mutf8.
p4raw-id: //depot/perl@10260
Diffstat (limited to 't/io/utf8.t')
| -rwxr-xr-x | t/io/utf8.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/io/utf8.t b/t/io/utf8.t index ac5cde7a6e..fee0fe6ace 100755 --- a/t/io/utf8.t +++ b/t/io/utf8.t @@ -9,6 +9,8 @@ BEGIN { } } +no utf8; # so that the naked 8-bit chars won't gripe under use utf8 + $| = 1; my $total_tests = 25; if (ord('A') == 193) { $total_tests = 24; } # EBCDIC platforms do not warn on UTF-8 |