In perl.git, the branch khw/kid51 has been updated <http://perl5.git.perl.org/perl.git/commitdiff/0e8f294888b87617d5133756bf8a5c03ab61fb2c?hp=8be793959d97070ac7c5bb7e58168a7dc2bd09db>
- Log ----------------------------------------------------------------- commit 0e8f294888b87617d5133756bf8a5c03ab61fb2c Author: Karl Williamson <[email protected]> Date: Tue Aug 9 22:48:27 2016 -0600 kid51 locale.t ----------------------------------------------------------------------- Summary of changes: lib/locale.t | 28 +++++++++++++++++++++++++++- 1 file changed, 27 insertions(+), 1 deletion(-) diff --git a/lib/locale.t b/lib/locale.t index 0b7f415..35e6ed6 100644 --- a/lib/locale.t +++ b/lib/locale.t @@ -742,7 +742,33 @@ debug "Scanning for locales...\n"; require POSIX; import POSIX ':locale_h'; -my @Locale = find_locales([ &POSIX::LC_CTYPE, &POSIX::LC_NUMERIC, &POSIX::LC_ALL ]); +#my @Locale = find_locales([ &POSIX::LC_CTYPE, &POSIX::LC_NUMERIC, &POSIX::LC_ALL ]); +my @Locale = qw( + C + be_BY.UTF-8 + ca_ES.ISO8859-1 + de_DE.ISO8859-1 + el_GR.ISO8859-7 + es_ES.ISO8859-1 + fi_FI.ISO8859-1 + fr_FR.ISO8859-1 + hu_HU.ISO8859-2 + it_IT.ISO8859-15 + ja_JP.eucJP + ja_JP.UTF-8 + ko_KR.eucKR + ko_KR.UTF-8 + lt_LT.ISO8859-13 + lt_LT.ISO8859-4 + lv_LV.ISO8859-13 + mn_MN.UTF-8 + no_NO.ISO8859-1 + pl_PL.ISO8859-2 + pt_BR.ISO8859-1 + ru_RU.KOI8-R + sk_SK.ISO8859-2 + ); + debug "Locales =\n"; for ( @Locale ) { -- Perl5 Master Repository
