Re: [perl #17439] broken Locale::Language in a UTF environment

Message-Id: 20020920085216.GC10512@soto.kasei.com

p4raw-id: //depot/perl@17927

diff --git a/lib/Locale/Codes/t/languages.t b/lib/Locale/Codes/t/languages.t
index c643f3a..92ccf4d 100644 (file)
--- a/lib/Locale/Codes/t/languages.t
+++ b/lib/Locale/Codes/t/languages.t
@@ -47,7 +47,7 @@ no utf8; # we contain Latin-1
  'code2language("nd") eq "Ndebele, North"',
  'code2language("ng") eq "Ndonga"',
  'code2language("nn") eq "Norwegian Nynorsk"',
- 'code2language("nb") eq "Norwegian Bokmål"',
+ 'code2language("nb") eq "Norwegian Bokmal"',
  'code2language("ny") eq "Chichewa; Nyanja"',
  'code2language("oc") eq "Occitan (post 1500)"',
  'code2language("os") eq "Ossetian; Ossetic"',

diff --git a/lib/Locale/Language.pm b/lib/Locale/Language.pm
index 34d2852..627923c 100644 (file)
--- a/lib/Locale/Language.pm
+++ b/lib/Locale/Language.pm
@@ -232,7 +232,7 @@ mt:Maltese
 my:Burmese
 
 na:Nauru
-nb:Norwegian Bokmål
+nb:Norwegian Bokmal
 nd:Ndebele, North
 ne:Nepali
 ng:Ndonga
@@ -301,7 +301,7 @@ ur:Urdu
 uz:Uzbek
 
 vi:Vietnamese
-vo:Volapük
+vo:Volapuk
 
 wo:Wolof