summaryrefslogtreecommitdiff
path: root/cpan/Unicode-Collate/t/loc_sv.t
diff options
context:
space:
mode:
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>2011-11-06 21:59:59 +0000
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>2011-11-06 23:49:03 +0000
commitd88bd77ad0e19d4e404b627f2a3b7c8b3a160de0 (patch)
treee646c7ff05a88060114920dc9f928c17e2d996ec /cpan/Unicode-Collate/t/loc_sv.t
parent7c5c3d9b4e6d7073250ddc6f26c36d71eeeb2de7 (diff)
downloadperl-d88bd77ad0e19d4e404b627f2a3b7c8b3a160de0.tar.gz
Update Unicode-Collate to CPAN version 0.84
[DELTA] 0.84 Sun Nov 6 14:44:51 2011 - U::C::Locale supports script codes. - U::C::Locale newly supports locales: fa, sr_Latn, ur. - added loc_fa.t, loc_srla.t, loc_ur.t in t. 0.83 Sun Oct 30 20:22:04 2011 - mklocale: auto-generate equivalents for suppressed contractions. * be.txt, bg.txt, kk.txt, mk.txt, ru.txt, sr.txt, uk.txt in data are simplified. * but no Locale/*.pl will be modified. 0.82 Sun Oct 30 10:03:48 2011 - U::C::Locale newly supports locales: si, si__dictionary, sv__reformed, ta, te, th, wae. - added loc_si.t, loc_sidt.t, loc_svrf.t, loc_ta.t, loc_te.t, loc_th.t, loc_wae.t in t. - updated some locales to CLDR 2.0 : sk, sr, sv, uk. - updated CJK/Pinyin.pm according to CLDR 2.0.
Diffstat (limited to 'cpan/Unicode-Collate/t/loc_sv.t')
-rw-r--r--cpan/Unicode-Collate/t/loc_sv.t24
1 files changed, 11 insertions, 13 deletions
diff --git a/cpan/Unicode-Collate/t/loc_sv.t b/cpan/Unicode-Collate/t/loc_sv.t
index c28632ea06..4d7c85034b 100644
--- a/cpan/Unicode-Collate/t/loc_sv.t
+++ b/cpan/Unicode-Collate/t/loc_sv.t
@@ -12,7 +12,7 @@ BEGIN {
}
use Test;
-BEGIN { plan tests => 117 };
+BEGIN { plan tests => 115 };
use strict;
use warnings;
@@ -57,6 +57,7 @@ ok($objSv->lt($ouml, "\x{1C0}"));
ok($objSv->eq('d', "\x{111}"));
ok($objSv->eq("\x{111}", $eth));
+ok($objSv->eq('v', 'w'));
ok($objSv->eq('y', $uuml));
ok($objSv->eq($uuml, "\x{171}"));
@@ -67,12 +68,13 @@ ok($objSv->eq($ostk, "\x{151}"));
ok($objSv->eq("\x{151}", "\x{153}"));
ok($objSv->eq("\x{153}", $ocrc));
-# 16
+# 17
$objSv->change(level => 2);
ok($objSv->lt('d', "\x{111}"));
ok($objSv->lt("\x{111}", $eth));
+ok($objSv->lt('v', 'w'));
ok($objSv->lt('y', $uuml));
ok($objSv->lt($uuml, "\x{171}"));
@@ -83,16 +85,14 @@ ok($objSv->lt($ostk, "\x{151}"));
ok($objSv->lt("\x{151}", "\x{153}"));
ok($objSv->lt("\x{153}", $ocrc));
-# 26
+# 28
ok($objSv->eq("\x{111}", "\x{110}"));
ok($objSv->eq($eth, $ETH));
ok($objSv->eq('th', $thrn));
ok($objSv->eq($thrn, 'TH'));
ok($objSv->eq('TH', $THRN));
-ok($objSv->eq('v', 'w'));
-ok($objSv->eq('w', 'V'));
-ok($objSv->eq('V', 'W'));
+ok($objSv->eq('w', 'W'));
ok($objSv->eq($uuml, $Uuml));
ok($objSv->eq("\x{171}", "\x{170}"));
ok($objSv->eq($arng, $Arng));
@@ -115,9 +115,7 @@ ok($objSv->lt($eth, $ETH));
ok($objSv->lt('th', $thrn));
ok($objSv->lt($thrn, 'TH'));
ok($objSv->lt('TH', $THRN));
-ok($objSv->lt('v', 'w'));
-ok($objSv->lt('w', 'V'));
-ok($objSv->lt('V', 'W'));
+ok($objSv->lt('w', 'W'));
ok($objSv->lt($uuml, $Uuml));
ok($objSv->lt("\x{171}", "\x{170}"));
ok($objSv->lt($arng, $Arng));
@@ -131,7 +129,7 @@ ok($objSv->lt("\x{151}", "\x{150}"));
ok($objSv->lt("\x{153}", "\x{152}"));
ok($objSv->lt($ocrc, $Ocrc));
-# 66
+# 64
ok($objSv->eq("d\x{335}", "\x{111}"));
ok($objSv->eq("D\x{335}", "\x{110}"));
@@ -154,7 +152,7 @@ ok($objSv->eq("O\x{30B}", "\x{150}"));
ok($objSv->eq("o\x{302}", $ocrc));
ok($objSv->eq("O\x{302}", $Ocrc));
-# 86
+# 84
ok($objSv->eq("u\x{308}\x{300}", "\x{1DC}"));
ok($objSv->eq("U\x{308}\x{300}", "\x{1DB}"));
@@ -178,7 +176,7 @@ ok($objSv->eq("O\x{308}\x{304}", "\x{22A}"));
ok($objSv->eq("o\x{338}\x{301}", "\x{1FF}"));
ok($objSv->eq("O\x{338}\x{301}", "\x{1FE}"));
-# 107
+# 105
ok($objSv->eq("o\x{302}\x{300}", "\x{1ED3}"));
ok($objSv->eq("O\x{302}\x{300}", "\x{1ED2}"));
@@ -191,4 +189,4 @@ ok($objSv->eq("O\x{302}\x{309}", "\x{1ED4}"));
ok($objSv->eq("o\x{302}\x{323}", "\x{1ED9}"));
ok($objSv->eq("O\x{302}\x{323}", "\x{1ED8}"));
-# 117
+# 115