From 4d4666ef4068f7f7e9bf8fd7b376c407dddbe1b5 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 28 Nov 2013 09:32:56 +0100 Subject: fix calling "child1_shrink" via package "Gtk3::HPaned" (mga#11797) fix can't locate object method "child1_shrink" via package "Gtk3::HPaned" --- perl-install/fs/partitioning_wizard.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'perl-install/fs/partitioning_wizard.pm') diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index fdb61cf7c..b8d68a382 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -332,10 +332,8 @@ sub create_display_box { $ratio * MB(600), 0)); my $hpane = Gtk3::HPaned->new; - $hpane->add1($part_widget); - $hpane->child1_shrink(0); - $hpane->add2($mdv_widget); - $hpane->child2_shrink(0); + $hpane->pack1($part_widget, 1, 0); + $hpane->pack2($mdv_widget, 1, 0); $hpane->set_position(ceil($ratio * $entry->{req_size})); ugtk3::gtkset_size_request($hpane, $entry->{width}, 0); ugtk3::gtkpack__($display_box, $hpane); -- cgit v1.2.1