diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/fsedit.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index e583645dc..fbde3609b 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -517,15 +517,15 @@ sub package_needed_for_partition_type { $l{type2fs($part)}; } -#- do this before modifying $part->{mntpoint} -#- $part->{mntpoint} should not be used here, use $mntpoint instead +#- you can do this before modifying $part->{mntpoint} +#- so $part->{mntpoint} should not be used here, use $mntpoint instead sub check_mntpoint { my ($mntpoint, $hd, $part, $all_hds) = @_; $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"); - $mntpoint ne $part->{mntpoint} && has_mntpoint($mntpoint, $all_hds) and die \N("There is already a partition with mount point %s\n", $mntpoint); + has_mntpoint($mntpoint, $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. |