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/NEWS | 2 ++ perl-install/diskdrake/interactive.pm | 1 + perl-install/install/NEWS | 2 ++ 3 files changed, 5 insertions(+) diff --git a/perl-install/NEWS b/perl-install/NEWS index 3321415a8..49415ffc2 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,5 @@ +- don't lose mountpoint if suggested partition was swap (#59510) + Version 13.31 - 26 May 2010 - service_harddrake: reconfigure X server after distro upgrades when video 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); diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 8eb0eb718..a9da5e8e7 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,5 @@ +- don't lose mountpoint if suggested partition was swap (#59510) + Version 13.30 - 26 May 2010 - final banner -- cgit v1.2.1