From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 25 Apr 2002 12:59:50 +0000 (+0000)
Subject: Cleaner Encode tests under -Mutf8.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e99a46cacbce2810e237ceb927078f57b92547ae;p=p5sagit%2Fp5-mst-13.2.git

Cleaner Encode tests under -Mutf8.

p4raw-id: //depot/perl@16152
---

diff --git a/ext/Encode/t/at-cn.t b/ext/Encode/t/at-cn.t
index 893c29f..6249fee 100644
--- a/ext/Encode/t/at-cn.t
+++ b/ext/Encode/t/at-cn.t
@@ -19,9 +19,11 @@ use strict;
 use Test::More tests => 29;
 use Encode;
 
+no utf8; # we have raw Chinese encodings here
+
 use_ok('Encode::CN');
 
-# Since JP.t already test basic file IO, we will just focus on
+# Since JP.t already tests basic file IO, we will just focus on
 # internal encode / decode test here. Unfortunately, to test
 # against all the UniHan characters will take a huge disk space,
 # not to mention the time it will take, and the fact that Perl
diff --git a/ext/Encode/t/at-tw.t b/ext/Encode/t/at-tw.t
index 830eb86..11abbf3 100644
--- a/ext/Encode/t/at-tw.t
+++ b/ext/Encode/t/at-tw.t
@@ -21,9 +21,11 @@ use strict;
 use Test::More tests => 17;
 use Encode;
 
+no utf8; # we have raw Chinese encodings here
+
 use_ok('Encode::TW');
 
-# Since JP.t already test basic file IO, we will just focus on
+# Since JP.t already tests basic file IO, we will just focus on
 # internal encode / decode test here. Unfortunately, to test
 # against all the UniHan characters will take a huge disk space,
 # not to mention the time it will take, and the fact that Perl
diff --git a/ext/Encode/t/jperl.t b/ext/Encode/t/jperl.t
index faaf743..4c2ef4d 100644
--- a/ext/Encode/t/jperl.t
+++ b/ext/Encode/t/jperl.t
@@ -20,6 +20,8 @@ BEGIN {
     $| = 1;
 }
 
+no utf8; # we have raw Japanese encodings here
+
 use strict;
 use Test::More tests => 18;
 my $Debug = shift;