From 328ce33d9b48588abd507591d403ffcdf9612a93 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Thu, 24 Aug 2000 15:57:23 +0000 Subject: *** empty log message *** --- perl-install/install_steps.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index cb2211abf..75a5b0dda 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -133,7 +133,7 @@ sub doPartitionDisksBefore { install_any::getFile("XXX"); #- close still opened filehandle eval { fs::umount("/tmp/hdimage") }; } - eval { fs::umount_all($o->{fstab}, $o->{prefix}) } if $o->{fstab} && !$::testing; + eval { fs::umount_all($o->{fstab}, $o->{prefix}) } if $o->{fstab} && !$::testing && !$::live; $o->{raid} ||= {}; } @@ -281,7 +281,7 @@ sub beforeInstallPackages { #- some packages need such files for proper installation. any::writeandclean_ldsoconf($o->{prefix}); - fs::write($o->{prefix}, $o->{fstab}, $o->{manualFstab}, $o->{useSupermount}); + $::live or fs::write($o->{prefix}, $o->{fstab}, $o->{manualFstab}, $o->{useSupermount}); network::add2hosts("$o->{prefix}/etc/hosts", "localhost.localdomain", "127.0.0.1"); -- cgit v1.2.1