diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2011-11-06 21:59:59 +0000 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2011-11-06 23:49:03 +0000 |
commit | d88bd77ad0e19d4e404b627f2a3b7c8b3a160de0 (patch) | |
tree | e646c7ff05a88060114920dc9f928c17e2d996ec /cpan/Unicode-Collate/t/loc_sv.t | |
parent | 7c5c3d9b4e6d7073250ddc6f26c36d71eeeb2de7 (diff) | |
download | perl-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.t | 24 |
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 |