diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-06-30 07:54:24 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-06-30 07:54:24 +0000 |
commit | f960ad1a1cc5fdba40cfbc547dfce52496b271a8 (patch) | |
tree | bf243407b74f931e33685f1b4f1864925d69e1e3 /perl-install/common.pm | |
parent | ab585100568ac2a395d885f14372a2e6c3ea775b (diff) | |
download | drakx-backup-do-not-use-f960ad1a1cc5fdba40cfbc547dfce52496b271a8.tar drakx-backup-do-not-use-f960ad1a1cc5fdba40cfbc547dfce52496b271a8.tar.gz drakx-backup-do-not-use-f960ad1a1cc5fdba40cfbc547dfce52496b271a8.tar.bz2 drakx-backup-do-not-use-f960ad1a1cc5fdba40cfbc547dfce52496b271a8.tar.xz drakx-backup-do-not-use-f960ad1a1cc5fdba40cfbc547dfce52496b271a8.zip |
do not load bloat POSIX
Diffstat (limited to 'perl-install/common.pm')
-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"); } } |