summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-11-27 13:34:40 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-11-27 13:34:40 +0000
commit4d112b7162c44a09bcce93510728b7bc1352fc4d (patch)
tree54632a4b49f36f541f5dbd89d8b52a6628c076af /perl-install
parenta3f658b1839d8566122f490bf0cd4703738187a0 (diff)
downloaddrakx-4d112b7162c44a09bcce93510728b7bc1352fc4d.tar
drakx-4d112b7162c44a09bcce93510728b7bc1352fc4d.tar.gz
drakx-4d112b7162c44a09bcce93510728b7bc1352fc4d.tar.bz2
drakx-4d112b7162c44a09bcce93510728b7bc1352fc4d.tar.xz
drakx-4d112b7162c44a09bcce93510728b7bc1352fc4d.zip
(create_packtable) simplify xpadding managment
Diffstat (limited to 'perl-install')
-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 50bde81cb..5549346a6 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -465,7 +465,7 @@ sub create_packtable {
ref $_ or $_ = Gtk2::Label->new($_);
$j != $#$l && !$options->{mcc} ?
$w->attach($_, $j, $j + 1, $i, $i + 1,
- 'fill', 'fill', defined $options->{xpadding} ? $options->{xpadding} : 5, $options->{ypadding} || 0) :
+ 'fill', 'fill', $options->{xpadding} || 5, $options->{ypadding} || 0) :
$w->attach($_, $j, $j + 1, $i, $i + 1,
['expand', 'fill'], ref($_) eq 'Gtk2::ScrolledWindow' || $_->get_data('must_grow') ? ['expand', 'fill'] : [], 0, 0);
$_->show;