summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-01-21 16:13:08 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-01-21 16:13:08 +0000
commitfb96edbd6ed677bd9f99752a7243cd8b07c39f97 (patch)
tree9b635eee4d0b4460fb458b54905ae868516f65fc /perl-install
parentcf9570d3b2a49028ead7aec8f54bbd6edefd8ad2 (diff)
downloaddrakx-fb96edbd6ed677bd9f99752a7243cd8b07c39f97.tar
drakx-fb96edbd6ed677bd9f99752a7243cd8b07c39f97.tar.gz
drakx-fb96edbd6ed677bd9f99752a7243cd8b07c39f97.tar.bz2
drakx-fb96edbd6ed677bd9f99752a7243cd8b07c39f97.tar.xz
drakx-fb96edbd6ed677bd9f99752a7243cd8b07c39f97.zip
(Mount_point): use uniq() on suggested mount points (otherwise the suggested mount point appears twice) (fixes bug #954)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/diskdrake/interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 57a17bd19..d5e201840 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -582,7 +582,7 @@ sub Mount_point {
isLoopback($part) ? N("Where do you want to mount the loopback file %s?", $part->{loopback_file}) :
N("Where do you want to mount device %s?", $part->{device}),
[ { label => N("Mount point"), val => \$mntpoint,
- list => [ if_($mntpoint, $mntpoint), fsedit::suggestions_mntpoint($all_hds), '' ],
+ list => [ uniq(if_($mntpoint, $mntpoint), fsedit::suggestions_mntpoint($all_hds), '') ],
not_edit => 0 } ],
complete => sub {
!isPartOfLoopback($part) || $mntpoint or $in->ask_warn('',