From a4299593feb14ed8317da49980b8c06e59688aa2 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 14 Apr 2000 23:59:01 +0000 Subject: no_comment --- perl-install/lang.pm | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'perl-install/lang.pm') diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 90b37e751..04f2a1fe6 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -290,10 +290,7 @@ sub load_po($) { $s .= "\%{'$lang'} = ("; my $f; -e ($f = "$_/po/$lang.po") and last foreach @INC; - unless (-e $f) { - -e ($f = "$_") and last foreach @INC; - $f = commands::install_cpio("$f/po", "$lang.po"); - } + local *F; unless ($f && -e $f) { -e ($f = "$_/po/$lang.po.bz2") and last foreach @INC; -- cgit v1.2.1