summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-02-13 13:01:59 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-02-13 13:01:59 +0000
commite5f5f8499fd80fa3be65c6f109797741b69bf765 (patch)
tree5e13364e8ddc285ac6e650a53f6d9ef1edf23873 /perl-install
parent5edc444691a59cd42bc383cfd9375739f2a6a4a6 (diff)
downloaddrakx-e5f5f8499fd80fa3be65c6f109797741b69bf765.tar
drakx-e5f5f8499fd80fa3be65c6f109797741b69bf765.tar.gz
drakx-e5f5f8499fd80fa3be65c6f109797741b69bf765.tar.bz2
drakx-e5f5f8499fd80fa3be65c6f109797741b69bf765.tar.xz
drakx-e5f5f8499fd80fa3be65c6f109797741b69bf765.zip
(new) simplify WizardTable
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 502221481..1362b59a6 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -898,7 +898,7 @@ sub new {
$o->{window}->set_border_width($::Wizard_splash ? 0 : 10);
set_main_window_size($o);
- $::WizardTable ||= Gtk2::Table->new(2, 2, 0);
+ $::WizardTable ||= Gtk2::VBox->new(0, 0);
if (!$::Plug && $o->{isEmbedded}) {
$::Plug = $::WizardWindow = gtkshow(Gtk2::Plug->new($::XID));
@@ -922,13 +922,12 @@ sub new {
});
} elsif (!$o->{isEmbedded}) {
$::WizardWindow->set_position('center_always') if !$::isStandalone;
- $::WizardTable->attach(gtkshow(Gtk2::Banner->new($::Wizard_pix_up || "wiz_default_up.png", $::Wizard_title)),
- 0, 2, 0, 1, 'fill', 'fill', 0, 0);
+ gtkpack__($::WizardTable, Gtk2::Banner->new($::Wizard_pix_up || "wiz_default_up.png", $::Wizard_title));
}
$::WizardWindow->show;
}
$::WizardWindow->set_title($title);
- $::WizardTable->attach($o->{window}, 0, 2, 1, 2, ['fill', 'expand'], ['fill', 'expand'], 0, 0);
+ gtkpack($::WizardTable, $o->{window});
}
$o->{rwindow}->signal_connect(destroy => sub { $o->{destroyed} = 1 });