diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-28 01:12:17 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-28 01:12:17 +0000 |
| commit | 3dca81fbfabd59d447e62826c453572aa4a961d2 (patch) | |
| tree | 00af202f6bf39729f9db6671e8e927aad4c769cb /lib/Locale | |
| parent | d3cea301eb4cb4c87b2540dea791ab175d5a0a51 (diff) | |
| download | perl-3dca81fbfabd59d447e62826c453572aa4a961d2.tar.gz | |
Be compatible also with non-UTF-8 locales.
p4raw-id: //depot/perl@15566
Diffstat (limited to 'lib/Locale')
| -rw-r--r-- | lib/Locale/Language.pm | 6 | ||||
| -rw-r--r-- | lib/Locale/Language.pod | 6 |
2 files changed, 4 insertions, 8 deletions
diff --git a/lib/Locale/Language.pm b/lib/Locale/Language.pm index df5f6235b4..a00559f94b 100644 --- a/lib/Locale/Language.pm +++ b/lib/Locale/Language.pm @@ -107,6 +107,8 @@ sub all_language_names my $code; my $language; + use bytes; + while (<DATA>) { next unless /\S/; @@ -228,7 +230,7 @@ mt:Maltese my:Burmese na:Nauru -nb:Norwegian Bokmål +nb:Norwegian Bokml nd:Ndebele, North ne:Nepali ng:Ndonga @@ -297,7 +299,7 @@ ur:Urdu uz:Uzbek vi:Vietnamese -vo:Volapük +vo:Volapk wo:Wolof diff --git a/lib/Locale/Language.pod b/lib/Locale/Language.pod index bd26d05955..07ce4bafab 100644 --- a/lib/Locale/Language.pod +++ b/lib/Locale/Language.pod @@ -141,12 +141,6 @@ Home page for ISO 639-2. =back -=head1 ENCODING - -The language names are encoded in UTF-8. (Currently this matters -only for two languages: Norwegian BokmÁl, and VolapÁk.) - - =head1 AUTHOR Neil Bowers E<lt>neil@bowers.comE<gt> |