summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive/gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-01-21 12:25:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-01-21 12:25:16 +0000
commit53b3e8ca12644cf0ac9568097263e791a3e83da3 (patch)
tree59df1700dd95db43e80e16d64a09590c0d83147e /perl-install/interactive/gtk.pm
parent28a5c7354505dd2e77bf929d83e5b230c701d58e (diff)
downloaddrakx-backup-do-not-use-53b3e8ca12644cf0ac9568097263e791a3e83da3.tar
drakx-backup-do-not-use-53b3e8ca12644cf0ac9568097263e791a3e83da3.tar.gz
drakx-backup-do-not-use-53b3e8ca12644cf0ac9568097263e791a3e83da3.tar.bz2
drakx-backup-do-not-use-53b3e8ca12644cf0ac9568097263e791a3e83da3.tar.xz
drakx-backup-do-not-use-53b3e8ca12644cf0ac9568097263e791a3e83da3.zip
- fix sizing main window
- always use a scrolled window when non pop_it (so that the buttons are at the bottom)
Diffstat (limited to 'perl-install/interactive/gtk.pm')
-rw-r--r--perl-install/interactive/gtk.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm
index acb8179f2..a77f49e8a 100644
--- a/perl-install/interactive/gtk.pm
+++ b/perl-install/interactive/gtk.pm
@@ -568,7 +568,7 @@ sub ask_fromW {
@widgets_advanced = map_index { $create_widget->($_, $::i + @$l) } @$l2;
my $pack = create_box_with_title($mainw, @{$common->{messages}});
- $mainw->{rwindow}->set_size_request(720, 420) if $mainw->{pop_it} && @$l;
+ ugtk2::set_main_window_size($mainw) if $mainw->{pop_it} && @$l;
my $first_time = 1;
my $set_advanced = sub {
@@ -616,7 +616,7 @@ sub ask_fromW {
create_scrolled_window(gtkpack(Gtk2::VBox->new(0,0),
$always_pack,
if_(@widgets_advanced, $advanced_pack)),
- [ 'automatic', 'automatic' ], 'none')) if @$l;
+ [ 'automatic', 'automatic' ], 'none')) if @$l || !$mainw->{pop_it};
if ($buttons_pack) {
if ($::isWizard && !$mainw->{pop_it} && $::isInstall) {