diff options
| author | Pascal Terjan <pterjan@mandriva.org> | 2009-10-15 17:48:08 +0000 |
|---|---|---|
| committer | Pascal Terjan <pterjan@mandriva.org> | 2009-10-15 17:48:08 +0000 |
| commit | 33b710f83c1fe9e2e641383a22e48e1407dd47bb (patch) | |
| tree | c480fa5bda6aa54ae7a3581566d07853dc0e8305 /perl-install/fs | |
| parent | 3f7180214b0d40b825bb4d0bcb165252ec3a7ba1 (diff) | |
| download | drakx-33b710f83c1fe9e2e641383a22e48e1407dd47bb.tar drakx-33b710f83c1fe9e2e641383a22e48e1407dd47bb.tar.gz drakx-33b710f83c1fe9e2e641383a22e48e1407dd47bb.tar.bz2 drakx-33b710f83c1fe9e2e641383a22e48e1407dd47bb.tar.xz drakx-33b710f83c1fe9e2e641383a22e48e1407dd47bb.zip | |
offer to resize last big enough windows partition instead of the first one, until user can chose
Diffstat (limited to 'perl-install/fs')
| -rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index 3cbdb3e51..b1826f2be 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -297,6 +297,9 @@ sub create_display_box { my $ev; my $desc; + my $last; + + $last = $resize->[-1] if $resize; foreach my $entry (@parts) { my $info = $entry->{device_LABEL}; my $w = Gtk2::Label->new($info); @@ -304,10 +307,10 @@ sub create_display_box { $ev = Gtk2::EventBox->new; $ev->add($w); my $part; - if ($resize) { - ($part) = grep { $_->{device} eq "$entry->{device}" } @$resize; + if ($last && $last->{device} eq "$entry->{device}") { + $part = $last; } - if ($resize && $part && !$desc) { + if ($part) { $ev->set_name("PART_vfat"); $w->set_size_request(ceil($ratio * $part->{min_win}), 0); my $ev2 = Gtk2::EventBox->new; |