diff options
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r-- | perl-install/any.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index a5b3f3074..ccad02480 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -253,6 +253,14 @@ arch() !~ /sparc/ ? ( 1; } +sub partitions_suggestions { + my ($in) = @_; + my $t = $::expert ? + $in->ask_from_list_('', _("What type of partitioning?"), [ keys %fsedit::suggestions ]) : + 'simple'; + $fsedit::suggestions{$t}; +} + my @etc_pass_fields = qw(name pw uid gid realname home shell); sub unpack_passwd { my ($l) = @_; |