summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2010-02-04 11:16:45 +0000
committerPascal Terjan <pterjan@mandriva.org>2010-02-04 11:16:45 +0000
commit8a6ffb9eee88fdbaa947590ee92fa95f53cc7b48 (patch)
tree7c71108554d73215400103fde02a28e2416e3311 /perl-install
parentb431f4af3648a41237d875602bc52cf96de1f9a7 (diff)
downloaddrakx-backup-do-not-use-8a6ffb9eee88fdbaa947590ee92fa95f53cc7b48.tar
drakx-backup-do-not-use-8a6ffb9eee88fdbaa947590ee92fa95f53cc7b48.tar.gz
drakx-backup-do-not-use-8a6ffb9eee88fdbaa947590ee92fa95f53cc7b48.tar.bz2
drakx-backup-do-not-use-8a6ffb9eee88fdbaa947590ee92fa95f53cc7b48.tar.xz
drakx-backup-do-not-use-8a6ffb9eee88fdbaa947590ee92fa95f53cc7b48.zip
- partitioning wizard:
o offer to install on dmraid (instead of crashing if no other disk) o offer to install on existing lvm o suggest non-removable disks first o unmount swap too when unmounting all partitions
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fs/mount.pm2
-rw-r--r--perl-install/fs/partitioning_wizard.pm4
-rw-r--r--perl-install/install/NEWS5
3 files changed, 9 insertions, 2 deletions
diff --git a/perl-install/fs/mount.pm b/perl-install/fs/mount.pm
index f7bea2ae4..59e3e8bbb 100644
--- a/perl-install/fs/mount.pm
+++ b/perl-install/fs/mount.pm
@@ -222,7 +222,7 @@ sub umount_all {
log::l("unmounting all filesystems");
foreach (sort { $b->{mntpoint} cmp $a->{mntpoint} }
- grep { $_->{mntpoint} && !$_->{real_mntpoint} } @$fstab) {
+ grep { $_->{mntpoint} && !$_->{real_mntpoint} || isSwap($_) } @$fstab) {
umount_part($_);
}
}
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm
index 2a354bfaf..21890ad91 100644
--- a/perl-install/fs/partitioning_wizard.pm
+++ b/perl-install/fs/partitioning_wizard.pm
@@ -502,7 +502,9 @@ sub main {
my $mainbox = Gtk2::VBox->new;
- my @kinds = map { diskdrake::hd_gtk::hd2kind($_) } @{$all_hds->{hds}};
+ my @kinds = map { diskdrake::hd_gtk::hd2kind($_) } sort { $a->{is_removable} <=> $b->{is_removable} } @{$all_hds->{hds} };
+ push @kinds, map { diskdrake::hd_gtk::raid2kind($_) } @{$all_hds->{raids}};
+ push @kinds, map { diskdrake::hd_gtk::lvm2kind($_) } @{$all_hds->{lvms}};
my $hdchoice = Gtk2::HBox->new;
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index bf878158f..af8fa7079 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -5,6 +5,11 @@
- detect_devices:
o fix detecting pcmcia serial devices
- support ddf1 raid
+- partitioning wizard:
+ o offer to install on dmraid (instead of crashing if no other disk)
+ o offer to install on existing lvm
+ o suggest non-removable disks first
+ o unmount swap too when unmounting all partitions
Version 12.77 - 30 October 2009