diff options
| -rw-r--r-- | perl-install/common.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm index 8f3ad65c7..d05c1afd9 100644 --- a/perl-install/common.pm +++ b/perl-install/common.pm @@ -81,9 +81,8 @@ sub translate { sub set_l10n_sort() { my $collation_locale = $ENV{LC_ALL}; if (!$collation_locale) { - require POSIX; - $collation_locale = POSIX::setlocale(POSIX::LC_COLLATE()); - $collation_locale =~ /UTF-8/ or POSIX::setlocale(POSIX::LC_COLLATE(), "$collation_locale.UTF-8"); + $collation_locale = c::setlocale(c::LC_COLLATE()); + $collation_locale =~ /UTF-8/ or c::setlocale(c::LC_COLLATE(), "$collation_locale.UTF-8"); } } |