From dd40621fa1311c9bce97902e2db57f8b15fab449 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 18 Jul 1999 21:05:17 +0000
Subject: *** empty log message ***

---
 perl-install/common.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/common.pm')

diff --git a/perl-install/common.pm b/perl-install/common.pm
index 1d7b8730f..c15aafdae 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -85,7 +85,8 @@ sub translate {
     my ($s) = @_;
     unless (defined %po::I18N::I18N) {
 	if (my ($lang) = ($ENV{LC_ALL} || $ENV{LANGUAGE} || $ENV{LC_MESSAGES} || $ENV{LANG}) =~ /(..)/) {
-	    eval { require "po/$lang.pm" }; $@ and warn "no translation in $lang available\n";
+	    local $SIG{__DIE__} = 'none';
+	    eval { require "po/$lang.pm" };
 	}
     }
     $po::I18N::I18N{$s} || $s;
-- 
cgit v1.2.1