diff options
author | Olivier Blin <oblin@mandriva.com> | 2009-10-28 17:49:41 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2009-10-28 17:49:41 +0000 |
commit | 2d16462b26c5651aa0699a707ba0201dada8d3e4 (patch) | |
tree | 848e394bf6b1d8f09a0172da8ee7551249449a52 /perl-install | |
parent | 83d1641795cb953558933cc7529ba21f7b861e5a (diff) | |
download | drakx-2d16462b26c5651aa0699a707ba0201dada8d3e4.tar drakx-2d16462b26c5651aa0699a707ba0201dada8d3e4.tar.gz drakx-2d16462b26c5651aa0699a707ba0201dada8d3e4.tar.bz2 drakx-2d16462b26c5651aa0699a707ba0201dada8d3e4.tar.xz drakx-2d16462b26c5651aa0699a707ba0201dada8d3e4.zip |
use ugtk2 sweet
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index b04dded63..86137a8a7 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -321,11 +321,9 @@ sub create_display_box { $part_widget->set_name("PART_vfat"); $part_info->set_size_request(ceil($ratio * $entry->{min_win}), 0); - my $mdv_widget = Gtk2::EventBox->new; - my $b2 = gtknew("Image", file => "small-logo"); - $mdv_widget->add($b2); - $b2->set_size_request($ratio * MB(600), 0); - $mdv_widget->set_name("PART_new"); + my $mdv_widget = gtkadd(gtkset_name(Gtk2::EventBox->new, "PART_new"), + gtkset_size_request(gtknew("Image", file => "small-logo"), + $ratio * MB(600), 0)); my $hpane = Gtk2::HPaned->new; $hpane->add1($part_widget); |