Needs PerlIO for :bytes.

p4raw-id: //depot/perl@18988

diff --git a/ext/Encode/t/CJKT.t b/ext/Encode/t/CJKT.t
index 4ed1e47..b8c2222 100644 (file)
--- a/ext/Encode/t/CJKT.t
+++ b/ext/Encode/t/CJKT.t
@@ -12,11 +12,10 @@ BEGIN {
        print "1..0 # Skip: EBCDIC\n";
        exit 0;
     }
-# should work w/o PerlIO now!
-#    unless (PerlIO::Layer->find('perlio')){
-#      print "1..0 # Skip: PerlIO required\n";
-#      exit 0;
-#   }
+    unless (PerlIO::Layer->find('perlio')){
+       print "1..0 # Skip: PerlIO required\n";
+       exit 0;
+    }
     $| = 1;
 }
 use strict;