From 6e0908fc5918ffd8b1a5b00e1c31e5056fb99af1 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Wed, 28 Apr 2004 08:57:58 +0000 Subject: Fix locale handling and the --no-locales command-line argument --- urpm/msg.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'urpm/msg.pm') diff --git a/urpm/msg.pm b/urpm/msg.pm index fb5264c7..d913b233 100644 --- a/urpm/msg.pm +++ b/urpm/msg.pm @@ -12,13 +12,16 @@ my $yesexpr = N("Yy"); eval { require Locale::gettext; use POSIX qw(LC_ALL); - setlocale(LC_ALL, ""); + POSIX::setlocale(LC_ALL, ""); Locale::gettext::textdomain("urpmi"); }; sub N { my ($format, @params) = @_; - sprintf(eval { Locale::gettext::gettext($format || '') } || $format, @params); + sprintf( + eval { Locale::gettext::gettext($format || '') } || $format, + @params, + ); } sub log_it { -- cgit v1.2.1