diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-14 23:59:01 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-14 23:59:01 +0000 |
| commit | a4299593feb14ed8317da49980b8c06e59688aa2 (patch) | |
| tree | cf2fea27a2884a3205a95d5c3042cdae91be7c66 /perl-install/lang.pm | |
| parent | 21066f8c4d8d136cca65f7138cabb25d4b4cfe8c (diff) | |
| download | drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar.gz drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar.bz2 drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar.xz drakx-a4299593feb14ed8317da49980b8c06e59688aa2.zip | |
no_comment
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 5 |
1 files changed, 1 insertions, 4 deletions
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; |