diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-18 20:04:24 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-18 20:04:24 +0000 |
commit | 88c28ceba84d380fbac88f13c3dfcca0d1b7f014 (patch) | |
tree | 4dd6fabae2efc0d6e3ed7185cf92ac4c262a5760 /lib/Locale | |
parent | 7ddf2a0a82284c8cbfd954bcff9ec9497fd3403a (diff) | |
download | perl-88c28ceba84d380fbac88f13c3dfcca0d1b7f014.tar.gz |
Retract the changes made at #9176 to Neil's and Ilya's module pods.
p4raw-id: //depot/perl@9206
Diffstat (limited to 'lib/Locale')
-rw-r--r-- | lib/Locale/Constants.pm | 2 | ||||
-rw-r--r-- | lib/Locale/Country.pm | 10 | ||||
-rw-r--r-- | lib/Locale/Language.pm | 6 |
3 files changed, 9 insertions, 9 deletions
diff --git a/lib/Locale/Constants.pm b/lib/Locale/Constants.pm index 957207ed90..cc11969c2c 100644 --- a/lib/Locale/Constants.pm +++ b/lib/Locale/Constants.pm @@ -31,7 +31,7 @@ Locale::Constants - constants for Locale codes =head1 SYNOPSIS use Locale::Constants; - + $codeset = LOCALE_CODE_ALPHA_2; =head1 DESCRIPTION diff --git a/lib/Locale/Country.pm b/lib/Locale/Country.pm index ea446ee5d9..f60b1352b2 100644 --- a/lib/Locale/Country.pm +++ b/lib/Locale/Country.pm @@ -7,13 +7,13 @@ Locale::Country - ISO codes for country identification (ISO 3166) =head1 SYNOPSIS use Locale::Country; - + $country = code2country('jp'); # $country gets 'Japan' $code = country2code('Norway'); # $code gets 'no' - + @codes = all_country_codes(); @names = all_country_names(); - + # add "uk" as a pseudo country code for United Kingdom Locale::Country::_alias_code('uk' => 'gb'); @@ -285,7 +285,7 @@ an ISO standard. If you would like 'uk' to work as the two-letter code for United Kingdom, use the following: use Locale::Country; - + Locale::Country::_alias_code('uk' => 'gb'); With this code, both "uk" and "gb" are valid codes for United Kingdom, @@ -325,7 +325,7 @@ The user is prompted for a country code, and then told the corresponding country name: $| = 1; # turn off buffering - + print "Enter country code: "; chop($code = <STDIN>); $country = code2country($code, LOCALE_CODE_ALPHA_2); diff --git a/lib/Locale/Language.pm b/lib/Locale/Language.pm index c561157deb..391cffab78 100644 --- a/lib/Locale/Language.pm +++ b/lib/Locale/Language.pm @@ -7,10 +7,10 @@ Locale::Language - ISO two letter codes for language identification (ISO 639) =head1 SYNOPSIS use Locale::Language; - + $lang = code2language('en'); # $lang gets 'English' $code = language2code('French'); # $code gets 'fr' - + @codes = all_language_codes(); @names = all_language_names(); @@ -173,7 +173,7 @@ The user is prompted for a language code, and then told the corresponding language name: $| = 1; # turn off buffering - + print "Enter language code: "; chop($code = <STDIN>); $lang = code2language($code); |