summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-09-17 12:24:39 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-09-17 12:24:39 +0000
commit4dcfaba58706816d17f6a9ada5ef20484ab4f4ae (patch)
tree571cf562625c57a6c349ce37f694ea015408ba17 /perl-install
parentf1615a7c99c9a4bef518de08b53cf4076e421c76 (diff)
downloaddrakx-4dcfaba58706816d17f6a9ada5ef20484ab4f4ae.tar
drakx-4dcfaba58706816d17f6a9ada5ef20484ab4f4ae.tar.gz
drakx-4dcfaba58706816d17f6a9ada5ef20484ab4f4ae.tar.bz2
drakx-4dcfaba58706816d17f6a9ada5ef20484ab4f4ae.tar.xz
drakx-4dcfaba58706816d17f6a9ada5ef20484ab4f4ae.zip
when the checking the mount point is not already used, don't take into account current partition
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fsedit.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index f3c5b763d..2ed4b53a3 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -525,7 +525,7 @@ sub check_mntpoint {
$mntpoint eq '' || isSwap($part) || isNonMountable($part) and return;
$mntpoint =~ m|^/| or die \N("Mount points must begin with a leading /");
$mntpoint =~ m|[\x7f-\xff]| and cdie \N("Mount points should contain only alphanumerical characters");
- has_mntpoint($mntpoint, $all_hds) and die \N("There is already a partition with mount point %s\n", $mntpoint);
+ mntpoint2part($mntpoint, [ grep { $_ ne $part } get_really_all_fstab($all_hds) ]) and die \N("There is already a partition with mount point %s\n", $mntpoint);
cdie \N("You've selected a software RAID partition as root (/).
No bootloader is able to handle this without a /boot partition.