In EBCDIC the BOM detection doesn't seem

to be working right.  For now skipping the test,
waiting for Dan's opinion.

p4raw-id: //depot/perl@15874

diff --git a/ext/Encode/t/Unicode.t b/ext/Encode/t/Unicode.t
index df4b8df..e5e7f8b 100644 (file)
--- a/ext/Encode/t/Unicode.t
+++ b/ext/Encode/t/Unicode.t
@@ -16,11 +16,10 @@ BEGIN {
 #      print "1..0 # Skip: PerlIO was not built\n";
 #      exit 0;
 #     }
-# should work on EBCDIC
-#    if (ord("A") == 193) {
-#      print "1..0 # Skip: EBCDIC\n";
-#      exit 0;
-#    }
+    if (ord("A") == 193) {
+       print "1..0 # Skip: EBCDIC\n";
+       exit 0;
+    }
     $| = 1;
 }