summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-09-18 11:15:07 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-09-18 11:15:07 +0000
commit4bf4b23ab7fc74b6465801745ca2e8a3b52a8a21 (patch)
treea1326221eeb7578108e6c9a2fe947c9083f44984 /perl-install/install_steps.pm
parentb6f79c8552d64f5ceb4905570893ceefbe7b212a (diff)
downloaddrakx-4bf4b23ab7fc74b6465801745ca2e8a3b52a8a21.tar
drakx-4bf4b23ab7fc74b6465801745ca2e8a3b52a8a21.tar.gz
drakx-4bf4b23ab7fc74b6465801745ca2e8a3b52a8a21.tar.bz2
drakx-4bf4b23ab7fc74b6465801745ca2e8a3b52a8a21.tar.xz
drakx-4bf4b23ab7fc74b6465801745ca2e8a3b52a8a21.zip
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 300a06ecb..352d0b6a0 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -151,7 +151,10 @@ sub doPartitionDisksAfter {
my ($part) = grep { $_->{device} eq $s->{device} } @{$o->{fstab}};
$part->{isMounted} ?
do { rmdir "/tmp/hdimage" ; symlinkf("$o->{prefix}$part->{mntpoint}", "/tmp/hdimage") } :
- eval { fs::mount($s->{device}, "/tmp/hdimage", $s->{type}) };
+ eval {
+ fs::mount($s->{device}, "/tmp/hdimage", $s->{type});
+ $part->{isMounted} = 1;
+ };
}
cat_("/proc/mounts") =~ m|(\S+)\s+/tmp/rhimage nfs| &&