Update Unicode-Collate to CPAN version 0.57

  [DELTA]

  0.57  Sun Aug 22 22:39:58 2010
    - Unicode::Collate::Locale newly supports locales: ca, et, fi, lv, sk, sl.

1 files changed, 11 insertions, 3 deletions

diff --git a/cpan/Unicode-Collate/t/loc_es.t b/cpan/Unicode-Collate/t/loc_es.t
index 228a58cbda..54ac671350 100644
--- a/cpan/Unicode-Collate/t/loc_es.t
+++ b/cpan/Unicode-Collate/t/loc_es.t
@@ -4,7 +4,7 @@ use warnings;
 use Unicode::Collate::Locale;
 
 use Test;
-plan tests => 22;
+plan tests => 26;
 
 my $objEs = Unicode::Collate::Locale->
     new(locale => 'ES', normalization => undef);
@@ -25,15 +25,23 @@ ok($objEs->gt("o", "n\x{303}"));
 
 # 10
 
+ok($objEs->eq("a\x{300}a", "aa\x{300}"));
+
 $objEs->change(level => 2);
 
+ok($objEs->gt("a\x{300}a", "aa\x{300}"));
+ok($objEs->lt("Ca\x{300}ca\x{302}", "ca\x{302}ca\x{300}"));
+ok($objEs->lt("ca\x{300}ca\x{302}", "Ca\x{302}ca\x{300}"));
+
+# 14
+
 ok($objEs->eq("ch", "Ch"));
 ok($objEs->eq("Ch", "CH"));
 ok($objEs->eq("ll", "Ll"));
 ok($objEs->eq("Ll", "LL"));
 ok($objEs->eq("n\x{303}", "N\x{303}"));
 
-# 15
+# 19
 
 $objEs->change(level => 3);
 
@@ -45,4 +53,4 @@ ok($objEs->lt("n\x{303}", "N\x{303}"));
 ok($objEs->eq("n\x{303}", pack('U', 0xF1)));
 ok($objEs->eq("N\x{303}", pack('U', 0xD1)));
 
-# 22
+# 26