summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-01-03 19:45:56 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-01-03 19:45:56 +0000
commit18ce92eb868a38de19c18f71646e923c9cb3bc85 (patch)
treee7a865358bc5f20ce03833eac4f78606340df53b /perl-install/ugtk2.pm
parent3de3dd8b0177c706350e4629770c5b48abf8d91e (diff)
downloaddrakx-18ce92eb868a38de19c18f71646e923c9cb3bc85.tar
drakx-18ce92eb868a38de19c18f71646e923c9cb3bc85.tar.gz
drakx-18ce92eb868a38de19c18f71646e923c9cb3bc85.tar.bz2
drakx-18ce92eb868a38de19c18f71646e923c9cb3bc85.tar.xz
drakx-18ce92eb868a38de19c18f71646e923c9cb3bc85.zip
(create_packtable): ScrolledWindow are not the only one allowed to grow,
widgets with get_data('must_grow') set are allowed too
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 622574401..d861b96d9 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -422,7 +422,7 @@ sub create_packtable {
$w->attach($_, $j, $j + 1, $i, $i + 1,
'fill', 'fill', 5, 0) :
$w->attach($_, $j, $j + 1, $i, $i + 1,
- ['expand', 'fill'], ref($_) eq 'Gtk2::ScrolledWindow' ? ['expand', 'fill'] : [], 0, 0);
+ ['expand', 'fill'], ref($_) eq 'Gtk2::ScrolledWindow' || $_->get_data('must_grow') ? ['expand', 'fill'] : [], 0, 0);
$_->show;
}
} @$l;