summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-08-23 12:30:27 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-08-23 12:30:27 +0000
commit6e0bb1756e368a569a5b054d939da4f3a2911c7b (patch)
tree5e9becbfc45935ba001d4f80659ed441e97fb512 /perl-install
parent03ae5d2a98d2356584ca88df2cde396d575164f4 (diff)
downloaddrakx-6e0bb1756e368a569a5b054d939da4f3a2911c7b.tar
drakx-6e0bb1756e368a569a5b054d939da4f3a2911c7b.tar.gz
drakx-6e0bb1756e368a569a5b054d939da4f3a2911c7b.tar.bz2
drakx-6e0bb1756e368a569a5b054d939da4f3a2911c7b.tar.xz
drakx-6e0bb1756e368a569a5b054d939da4f3a2911c7b.zip
(cond_umount_hdimage): do not unmount /tmp/hdimage if not using ramdisk
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 5d231498b..cf5b72379 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -1042,7 +1042,7 @@ sub remove_bigseldom_used {
}
sub cond_umount_hdimage() {
- if (cat_("/proc/mounts") =~ m|/\w+/(\S+)\s+/tmp/hdimage\s+(\S+)| && !$::o->{partitioning}{readonly}) {
+ if (cat_("/proc/mounts") =~ m|/\w+/(\S+)\s+/tmp/hdimage\s+(\S+)| && !$::o->{partitioning}{readonly} && common::usingRamdisk()) {
$::o->{stage1_hd} = { device => $1, type => $2 };
getFile("XXX"); #- close still opened filehandle
eval { fs::umount("/tmp/hdimage") };