summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-08-13 09:08:20 +0000
committerThierry Vignaud <tv@mandriva.org>2008-08-13 09:08:20 +0000
commitcbab27f90328f79b32af16277944d5ec92e987a3 (patch)
tree48b2d5e73cb50141f94f45eccecd65650e871dc7 /perl-install
parent989e16ba8089097bb38c8b4a3fdc8a3da4117c07 (diff)
downloaddrakx-backup-do-not-use-cbab27f90328f79b32af16277944d5ec92e987a3.tar
drakx-backup-do-not-use-cbab27f90328f79b32af16277944d5ec92e987a3.tar.gz
drakx-backup-do-not-use-cbab27f90328f79b32af16277944d5ec92e987a3.tar.bz2
drakx-backup-do-not-use-cbab27f90328f79b32af16277944d5ec92e987a3.tar.xz
drakx-backup-do-not-use-cbab27f90328f79b32af16277944d5ec92e987a3.zip
(add_kind2notebook) move action button box to right
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/diskdrake/hd_gtk.pm7
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index d53b15030..ce3e0b5bf 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -132,13 +132,16 @@ sub add_kind2notebook {
$kind->{display_box} = gtkset_size_request(Gtk2::HBox->new(0,0), $width, $height);
$kind->{action_box} = gtkset_size_request(Gtk2::VBox->new(0,0), $::isStandalone ? 165 : 150, $::isEmbedded ? 150 : 180);
$kind->{info_box} = Gtk2::VBox->new(0,0);
- $kind->{main_box} =
+ my $box =
gtkpack_(Gtk2::VBox->new(0,7),
0, $kind->{display_box},
0, filesystems_button_box(),
1, gtkpack_(Gtk2::HBox->new(0,7),
- 0, $kind->{action_box},
1, $kind->{info_box}));
+ $kind->{main_box} = gtknew('HBox', children => [
+ 1, $box,
+ 0, $kind->{action_box},
+ ]);
ugtk2::add2notebook($notebook_widget, $kind->{name}, $kind->{main_box});
push @notebook, $kind;
$kind;