From 5cb4181c9d1488e4025a5358cea6f1e7fda862a9 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 25 Feb 2000 11:45:13 +0000
Subject: no_comment

---
 perl-install/lang.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index aa7087390..b75ea5c01 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -283,7 +283,7 @@ sub load_po($) {
 	$f = commands::install_cpio("$f/po", "$lang.po");
     }
     local *F;
-    unless (-e $f) {
+    unless ($f && -e $f) {
 	-e ($f = "$_/po/$lang.po.bz2") and last foreach @INC;
 	if (-e $f) {
 	    open F, "bzip2 -dc $f 2>/dev/null |";
-- 
cgit v1.2.1