From 893ca0489266ad81a97c02f7be7b9b1357ee1f6d Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 1 Mar 2004 08:12:37 +0000 Subject: (create_packtable) wrap labels by default --- perl-install/ugtk2.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/ugtk2.pm') diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index bc16ecac2..1b25aa25f 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -480,7 +480,7 @@ sub create_packtable { each_index { my $j = $::i; if ($_) { - ref $_ or $_ = Gtk2::Label->new($_); + ref $_ or $_ = Gtk2::WrappedLabel->new($_); $j != $#$l && !$options->{mcc} ? $w->attach($_, $j, $j + 1, $i, $i + 1, 'fill', 'fill', $options->{xpadding}, $options->{ypadding}) : -- cgit v1.2.1