summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-02-01 09:58:18 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-02-01 09:58:18 +0000
commit84518671ee8bdc8f4093f3dd5e7e7ae5df0c3866 (patch)
tree2589186a7c672e21ff3e58ed8b6f1a2046df34d9 /perl-install/install_steps_interactive.pm
parent9eea640f641b1fa2ebc26d57dba550ef696ae963 (diff)
downloaddrakx-84518671ee8bdc8f4093f3dd5e7e7ae5df0c3866.tar
drakx-84518671ee8bdc8f4093f3dd5e7e7ae5df0c3866.tar.gz
drakx-84518671ee8bdc8f4093f3dd5e7e7ae5df0c3866.tar.bz2
drakx-84518671ee8bdc8f4093f3dd5e7e7ae5df0c3866.tar.xz
drakx-84518671ee8bdc8f4093f3dd5e7e7ae5df0c3866.zip
check the given mount points
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm8
1 files changed, 8 insertions, 0 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index e26e2538e..f905030d5 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -265,6 +265,14 @@ sub ask_mntpoint_s { #- }{}
} else {
$o->ask_from_({ messages => N("Choose the mount points"),
interactive_help_id => 'ask_mntpoint_s',
+ callbacks => {
+ complete => sub {
+ require diskdrake::interactive;
+ eval { 1, find_index {
+ !diskdrake::interactive::check_mntpoint($o, $_->{mntpoint}, $_, $o->{all_hds});
+ } @fstab };
+ },
+ },
},
[ map {
{