diff options
author | damien <damien@mandriva.com> | 2001-08-17 11:14:04 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2001-08-17 11:14:04 +0000 |
commit | 08c73d71e15c7894f6d0b504999550b090e7e279 (patch) | |
tree | 9ac7bb44f87a211f6dcbf1205a4f4bcf1ec98b5e /perl-install | |
parent | 9d026054bbb21cb8b73a78693bc3d89649c869e3 (diff) | |
download | drakx-08c73d71e15c7894f6d0b504999550b090e7e279.tar drakx-08c73d71e15c7894f6d0b504999550b090e7e279.tar.gz drakx-08c73d71e15c7894f6d0b504999550b090e7e279.tar.bz2 drakx-08c73d71e15c7894f6d0b504999550b090e7e279.tar.xz drakx-08c73d71e15c7894f6d0b504999550b090e7e279.zip |
no scrollbar if list <= 10 and the list is alone
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/interactive_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm index 0e4ec437d..6373494f0 100644 --- a/perl-install/interactive_gtk.pm +++ b/perl-install/interactive_gtk.pm @@ -415,7 +415,7 @@ sub ask_from_entries_refW { } else { ($w, $set) = $use_boxradio ? create_boxradio(@para) : create_clist(@para); } - if (@{$e->{list}} > 4) { + if (@{$e->{list}} > (@$l == 1 ? 10 : 4)) { $has_scroll = 1; $expand = 1; $real_w = createScrolledWindow($w); |