diff options
author | Pascal Terjan <pterjan@mandriva.org> | 2009-10-13 19:24:43 +0000 |
---|---|---|
committer | Pascal Terjan <pterjan@mandriva.org> | 2009-10-13 19:24:43 +0000 |
commit | 56f6f9d3fc3a7d73cda942c7c2c9f6b2a360206a (patch) | |
tree | 7cb5725bcd12095f884f79882559f364a84a11f4 /perl-install | |
parent | 3f2f3079334bc9c776248ea7fb4b70b319ba669f (diff) | |
download | drakx-56f6f9d3fc3a7d73cda942c7c2c9f6b2a360206a.tar drakx-56f6f9d3fc3a7d73cda942c7c2c9f6b2a360206a.tar.gz drakx-56f6f9d3fc3a7d73cda942c7c2c9f6b2a360206a.tar.bz2 drakx-56f6f9d3fc3a7d73cda942c7c2c9f6b2a360206a.tar.xz drakx-56f6f9d3fc3a7d73cda942c7c2c9f6b2a360206a.zip |
o reduce drawings height
o fix windows resize width
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/NEWS | 2 | ||||
-rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 8 | ||||
-rw-r--r-- | perl-install/install/NEWS | 2 |
3 files changed, 8 insertions, 4 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 8808bc3a0..b5ec4d1dd 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,5 +1,7 @@ - partitioning wizard: o allow using existing partition on all disks (#54478) + o reduce drawings height + o fix windows resize width - use UTF-8 for zh_TW (#53976) Version 12.64 - 12 October 2009 diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index 1248f1171..6fe41bfa6 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -283,7 +283,7 @@ sub create_display_box { $width -= 24 if $resize || $fill_empty; my $minwidth = 40; - my $display_box = ugtk2::gtkset_size_request(Gtk2::HBox->new(0,0), $width, 30); + my $display_box = ugtk2::gtkset_size_request(Gtk2::HBox->new(0,0), $width, 24); my $ratio = $totalsectors ? ($width - @parts * ($minwidth+1)) / $totalsectors : 1; while (1) { @@ -321,8 +321,8 @@ sub create_display_box { $hpane->child1_shrink(0); $hpane->add2($ev2); $hpane->child2_shrink(0); - $hpane->set_position(ceil($ratio * $part->{min_win})); - ugtk2::gtkset_size_request($hpane, $ratio * $part->{size}, 30); + $hpane->set_position(ceil($ratio * $part->{min_win} + $minwidth * $part->{min_win} / $part->{size})); + ugtk2::gtkset_size_request($hpane, $ratio * $part->{size} + $minwidth, 0); ugtk2::gtkpack__($display_box, $hpane); my $size = int($hpane->get_position / $ratio); @@ -431,7 +431,7 @@ sub display_choices { $item = Gtk2::EventBox->new; my $b2 = Gtk2::Label->new("Mandriva"); $item->add($b2); - $b2->set_size_request(516,30); + $b2->set_size_request(516,24); $item->set_name("PART_ext4"); } elsif ($s eq 'diskdrake') { } else { diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index a9c08ebda..9ac7d8c1b 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,6 +1,8 @@ - do not call obsolete Xconfig::default::config_keyboard function (#54541) - partitioning wizard: o allow using existing partition on all disks (#54478) + o reduce drawings height + o fix windows resize width - make sure suggests are disabled in truly minimal install - do not attempt to configure autologin if CAT_X is not selected - use UTF-8 for zh_TW (#53976) |