From 196b096a31580adccec0c9decf7d8249ed5d372a Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Fri, 28 May 2010 10:11:37 +0000 Subject: don't lose mountpoint if suggested partition was swap (#59510) --- perl-install/diskdrake/interactive.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/diskdrake/interactive.pm') diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index 0c6421b8e..6d22bd43c 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -510,6 +510,7 @@ sub Create { ], complete => sub { $part->{size} = from_Mb($mb_size, min_partition_size($hd), $max - $part->{start}); #- need this to be able to get back the approximation of using MB $do_suggest_mount_point = 0 if !$part->{mntpoint}; + put_in_hash($part, fs::type::type_name2subpart($type_name)); $part->{mntpoint} = '' if isNonMountable($part); $part->{mntpoint} = 'swap' if isSwap($part); fs::mount_options::set_default($part, ignore_is_removable => 1); -- cgit v1.2.1