This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Revert "Update Unicode-Collate to CPAN version 0.71"
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Wed, 19 Jan 2011 14:10:38 +0000 (14:10 +0000)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Wed, 19 Jan 2011 14:10:38 +0000 (14:10 +0000)
This reverts commit cac3df65afe2fed9ad80147a24b5ae6ea601a609.

Backing out change to XS

Porting/Maintainers.pl
cpan/Unicode-Collate/Changes
cpan/Unicode-Collate/Collate.pm
cpan/Unicode-Collate/Collate/Locale.pm
cpan/Unicode-Collate/README
cpan/Unicode-Collate/t/loc_test.t
pod/perldelta.pod

index 8e621de..2090e43 100755 (executable)
@@ -1577,7 +1577,7 @@ use File::Glob qw(:case);
     'Unicode::Collate' =>
        {
        'MAINTAINER'    => 'sadahiro',
-       'DISTRIBUTION'  => 'SADAHIRO/Unicode-Collate-0.71-withoutworldwriteables.tar.gz',
+       'DISTRIBUTION'  => 'SADAHIRO/Unicode-Collate-0.70-withoutworldwriteables.tar.gz',
        'FILES'         => q[cpan/Unicode-Collate],
        'EXCLUDED'      => [ qr{N$},
                    qr{^data/},
index d5fd8b4..c7bba12 100644 (file)
@@ -1,11 +1,7 @@
 Revision history for Perl module Unicode::Collate.
 
-0.71  Tue Jan 18 22:29:44 2011
-    - t/loc_test.t should not fail without Unicode::Normalize.
-
 0.70  Sun Jan 16 20:31:07 2011
-    - Now U::C::Locale->new will use the compiled DUCET via XS if available.
-      added some tests in t/loc_test.t.
+    - Now U::C::Locale->new will use the compiled DUCET via XS.
 
 0.69  Sat Jan 15 19:41:11 2011
     - clarified about XSUB. revised INSTALL in README.
index 4268b45..05822b2 100644 (file)
@@ -14,7 +14,7 @@ use File::Spec;
 
 no warnings 'utf8';
 
-our $VERSION = '0.71';
+our $VERSION = '0.70';
 our $PACKAGE = __PACKAGE__;
 
 require DynaLoader;
index c589144..39f04fc 100644 (file)
@@ -4,7 +4,7 @@ use strict;
 use Carp;
 use base qw(Unicode::Collate);
 
-our $VERSION = '0.71';
+our $VERSION = '0.70';
 
 use File::Spec;
 
index 002058f..7142c5f 100644 (file)
@@ -1,4 +1,4 @@
-Unicode/Collate version 0.71
+Unicode/Collate version 0.70
 ===============================
 
 NAME
index 8d7d74a..60c9773 100644 (file)
@@ -130,8 +130,7 @@ ok("@sortFr" eq "@listFr");
 
 {
     my $keyXS = '__useXS'; # see Unicode::Collate internal
-    my $noLoc = Unicode::Collate->new(normalization => undef);
-    my $UseXS = ref($noLoc->{$keyXS});
+    my $UseXS = ref Unicode::Collate->new->{$keyXS};
     ok(ref($Collator->{$keyXS}), $UseXS);
     ok(ref($objFr   ->{$keyXS}), $UseXS);
     ok(ref($objEs   ->{$keyXS}), $UseXS);
index 0724722..8f83572 100644 (file)
@@ -257,7 +257,7 @@ C<Time::Local> has been upgraded from version 1.1901_01 to 1.2000.
 
 =item *
 
-C<Unicode::Collate> has been upgraded from version 0.68 to 0.71
+C<Unicode::Collate> has been upgraded from version 0.68 to 0.70
 
 This also sees the switch from using the pure-perl version of this
 module to the XS version.