summaryrefslogtreecommitdiffstats
path: root/perl-install/fs
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2009-10-28 17:49:41 +0000
committerOlivier Blin <oblin@mandriva.com>2009-10-28 17:49:41 +0000
commit2d16462b26c5651aa0699a707ba0201dada8d3e4 (patch)
tree848e394bf6b1d8f09a0172da8ee7551249449a52 /perl-install/fs
parent83d1641795cb953558933cc7529ba21f7b861e5a (diff)
downloaddrakx-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/fs')
-rw-r--r--perl-install/fs/partitioning_wizard.pm8
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);