From eb53575902c0282896e92d7d6d76a89bca420e5a Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 9 Nov 1999 18:13:02 +0000 Subject: *** empty log message *** --- perl-install/commands.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/commands.pm') diff --git a/perl-install/commands.pm b/perl-install/commands.pm index 120aa99b4..26d2a7eb3 100644 --- a/perl-install/commands.pm +++ b/perl-install/commands.pm @@ -497,12 +497,12 @@ sub lspci { } sub dmesg { print cat_("/tmp/syslog"); } -my %cached_failed_install_cpio; +#my %cached_failed_install_cpio; #- double space between sub and install_cpio cuz install_cpio is not a shell command sub install_cpio($$) { my ($dir, $name) = @_; - return if $cached_failed_install_cpio{"$dir $name"}; +# return if $cached_failed_install_cpio{"$dir $name"}; return "$dir/$name" if -e "$dir/$name"; my $cpio = "$dir.cpio.bz2"; @@ -514,7 +514,7 @@ sub install_cpio($$) { run_program::run("cd $dir ; bzip2 -cd $cpio | cpio -id $name $name/*"); #- not found, cache result - return if $cached_failed_install_cpio{"$dir $name"} = ! -e "$dir/$name"; +# return if $cached_failed_install_cpio{"$dir $name"} = ! -e "$dir/$name"; "$dir/$name"; } -- cgit v1.2.1