summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-04-06 17:27:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-04-06 17:27:16 +0000
commit4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac (patch)
treed49c1655880e29385024d7941bbb964b03c3e960 /perl-install/my_gtk.pm
parent658f028abc50486955e99d7083cdff8e07088e6f (diff)
downloaddrakx-backup-do-not-use-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar
drakx-backup-do-not-use-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar.gz
drakx-backup-do-not-use-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar.bz2
drakx-backup-do-not-use-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar.xz
drakx-backup-do-not-use-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.zip
no_comment
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r--perl-install/my_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 491680271..be64d842b 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -519,7 +519,7 @@ sub _ask_from_list {
gtkadd($o->{window},
gtkpack($o->create_box_with_title(@$messages),
gtkpack_(new Gtk::VBox(0,7),
- 1, @$l > 15 ? gtkset_usize(createScrolledWindow($list), 200, min(400, $::windowheight - 60)) : $list,
+ 1, @$l > 15 ? gtkset_usize(createScrolledWindow($list), 200, min(350, $::windowheight - 60)) : $list,
@okcancel || !ref $title ? (0, create_okcancel($o, @okcancel)) : ())
));
$o->show; #- otherwise the moveto is not done