auto_allocate partitions choice modified. diskdrake in expert asks what kind

of auto_allocation is wanted, others choose 'simple' in %fsedit::suggestions

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) = @_;