Update Unicode-Collate to CPAN version 1.21

  [DELTA]

1.21  Sat Nov  4 10:49:19 2017
    - mklocale: [rt.cpan.org #121664] . removed from @INC (take 2)
    - DUCET is updated (for Unicode 9.0.0) as Collate/allkeys.txt.
      * Please notice that allkeys.txt will be overwritten if you have had
        other allkeys.txt already.
    - The default UCA_Version is 34.
    - added tangut.t in t.
    - Locale/*.pl and CJK/Korean.pm are updated.

1.20  Fri Nov  3 11:50:21 2017
    - XS: [rt.cpan.org #121664] . removed from @INC
    - U::C::Locale newly supports locales: dsb, lkt.

1 files changed, 7 insertions, 6 deletions

diff --git a/cpan/Unicode-Collate/t/loc_estr.t b/cpan/Unicode-Collate/t/loc_estr.t
index 493aa85fbf..b8470cb4ea 100644
--- a/cpan/Unicode-Collate/t/loc_estr.t
+++ b/cpan/Unicode-Collate/t/loc_estr.t
@@ -16,7 +16,7 @@ BEGIN {
 
 use strict;
 use warnings;
-BEGIN { $| = 1; print "1..27\n"; }
+BEGIN { $| = 1; print "1..28\n"; }
 my $count = 0;
 sub ok ($;$) {
     my $p = my $r = shift;
@@ -37,7 +37,7 @@ my $objEsTrad = Unicode::Collate::Locale->
     new(locale => 'ES-trad', normalization => undef);
 
 ok($objEsTrad->getlocale, 'es__traditional');
-ok($objEsTrad->locale_version, 1.19);
+ok($objEsTrad->locale_version, 1.21);
 
 $objEsTrad->change(level => 1);
 
@@ -48,9 +48,10 @@ ok($objEsTrad->lt("l", "ll"));
 ok($objEsTrad->lt("lz","ll"));
 ok($objEsTrad->gt("m", "ll"));
 ok($objEsTrad->lt("n", "n\x{303}"));
+ok($objEsTrad->lt("nz","n\x{303}"));
 ok($objEsTrad->gt("o", "n\x{303}"));
 
-# 11
+# 12
 
 ok($objEsTrad->eq("a\x{300}a", "aa\x{300}"));
 
@@ -60,7 +61,7 @@ ok($objEsTrad->gt("a\x{300}a", "aa\x{300}"));
 ok($objEsTrad->lt("Ca\x{300}ca\x{302}", "ca\x{302}ca\x{300}"));
 ok($objEsTrad->lt("ca\x{300}ca\x{302}", "Ca\x{302}ca\x{300}"));
 
-# 15
+# 16
 
 ok($objEsTrad->eq("ch", "Ch"));
 ok($objEsTrad->eq("Ch", "CH"));
@@ -68,7 +69,7 @@ ok($objEsTrad->eq("ll", "Ll"));
 ok($objEsTrad->eq("Ll", "LL"));
 ok($objEsTrad->eq("n\x{303}", "N\x{303}"));
 
-# 20
+# 21
 
 $objEsTrad->change(level => 3);
 
@@ -80,4 +81,4 @@ ok($objEsTrad->lt("n\x{303}", "N\x{303}"));
 ok($objEsTrad->eq("n\x{303}", pack('U', 0xF1)));
 ok($objEsTrad->eq("N\x{303}", pack('U', 0xD1)));
 
-# 27
+# 28