From dd2a188e2b5858c62bf9aac7fda0e06cdf648a41 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Thu, 2 Sep 2004 05:48:07 +0000
Subject: Don't log too much

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

(limited to 'perl-install')

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 508675b8e..af60fd099 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -210,7 +210,7 @@ sub getFile {
 	    $o_altroot ||= '/tmp/image';
 	    $f2 = "$o_altroot/$rel" if $rel !~ m,^/, && (!$postinstall_rpms || !-e $f2);
 	    #- $f2 = "/$rel" if !$::o->{packages}{mediums}{$asked_medium}{rpmsdir} && !-e $f2; #- not a relative path, should not be necessary with new media layout
-	    my $F; open($F, $f2) && $F or do { log::l("Can't open $f2: $!"); return undef }
+	    my $F; open($F, $f2) && $F or do { $f2 !~ /XXX/ and log::l("Can't open $f2: $!"); return undef }
 	}
     } || errorOpeningFile($f);
 }
-- 
cgit v1.2.1