summaryrefslogtreecommitdiff
path: root/lib/Locale
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-03-18 20:04:24 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-03-18 20:04:24 +0000
commit88c28ceba84d380fbac88f13c3dfcca0d1b7f014 (patch)
tree4dd6fabae2efc0d6e3ed7185cf92ac4c262a5760 /lib/Locale
parent7ddf2a0a82284c8cbfd954bcff9ec9497fd3403a (diff)
downloadperl-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.pm2
-rw-r--r--lib/Locale/Country.pm10
-rw-r--r--lib/Locale/Language.pm6
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);