Changeset 1748 for lang/perl/Encode

Timestamp:

11/18/07 19:38:13 (14 months ago)

Author:

dankogai

Message:

ported back from Perl 5.10-RC1

Location:

lang/perl/Encode/trunk

Files:

• Changes (modified) (1 diff)
• META.yml (modified) (1 diff)
• encoding.pm (modified) (2 diffs)
• t/mime_header_iso2022jp.t (modified) (1 diff)

lang/perl/Encode/trunk/Changes

@@ -4 +4 @@
 #
 $Revision: 2.23 $ $Date: 2007/05/29 18:15:32 $
+! encoding.pm t/mime_header_iso2022jp.t
+  ported back from Perl 5.10-RC1
+
+2.23 2007/05/29 18:15:32
 ! Encode.xs
   got rid of global fallback_cb; encode_method() now takes one more

lang/perl/Encode/trunk/META.yml

@@ -1 @@
---- #YAML:1.0
-name:                Encode
-version:             2.23
-abstract:            ~
-license:             ~
-generated_by:        ExtUtils::MakeMaker version 6.32
-distribution_type:   module
-requires:     
-meta-spec:
-    url:     http://module-build.sourceforge.net/META-spec-v1.2.html
-    version: 1.2
+# http://module-build.sourceforge.net/META-spec.html
+#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
+name:         Encode
+version:      2.14
+version_from: Encode.pm
+installdirs:  perl
+requires:
+
+distribution_type: module
+generated_by: ExtUtils::MakeMaker version 6.17

lang/perl/Encode/trunk/encoding.pm

@@ -324 +324 @@
 This pragma affects utf8::upgrade, but not utf8::downgrade.
 
+=head2 Side effects
+
+If the C<encoding> pragma is in scope then the lengths returned are
+calculated from the length of C<$/> in Unicode characters, which is not
+always the same as the length of C<$/> in the native encoding.
+
+This pragma affects utf8::upgrade, but not utf8::downgrade.
+
 =head1 FEATURES THAT REQUIRE 5.8.1
 
@@ -621 +629 @@
 Arabic and Hebrew).
 
+=item Thread safety
+
+C<use encoding ...> is not thread-safe (i.e., do not use in threaded
+applications).
+
 =back
 

lang/perl/Encode/trunk/t/mime_header_iso2022jp.t

@@ -1 +1 @@
 
-use Test::More tests => 14;
+use Test::More;
+
+BEGIN {
+    if( ord("A") == 193 ) {
+        plan skip_all => 'No Encode::MIME::Header::ISO_2022_JP on EBCDIC Platforms';
+    } else {
+        plan tests => 14;
+    }
+}
 
 use strict;