From 08b1aa90a015b9748d63b83c742aec07d1f4c87d Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 5 Dec 2003 20:56:28 +0000 Subject: added support for missing Locale::gettext (as for RedHat for fast port) --- urpm.pm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'urpm.pm') diff --git a/urpm.pm b/urpm.pm index 2887b73a..20c72e2b 100644 --- a/urpm.pm +++ b/urpm.pm @@ -10,15 +10,17 @@ $VERSION = '4.4'; use URPM; use URPM::Resolve; use POSIX; -use Locale::gettext(); #- I18N. -setlocale(LC_ALL, ""); -Locale::gettext::textdomain("urpmi"); +eval { + require Locale::gettext; + setlocale(LC_ALL, ""); + Locale::gettext::textdomain("urpmi"); +}; sub N { my ($format, @params) = @_; - sprintf(Locale::gettext::gettext($format || ''), @params); + sprintf(eval { Locale::gettext::gettext($format || '') } || $format, @params); } #- tool functions. -- cgit v1.2.1