summaryrefslogtreecommitdiffstats
path: root/perl-install/mygtk2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-09-11 15:08:19 +0000
committerThierry Vignaud <tv@mandriva.org>2008-09-11 15:08:19 +0000
commitaa3db47fe4d77d06b5abd4e5e44bff55d0a05cc2 (patch)
treeb4981d70640c891e1c28cd07a00f473e88d3ff0d /perl-install/mygtk2.pm
parent70c79d64b40d992cc18ed971d939c9c78eb0543c (diff)
downloaddrakx-aa3db47fe4d77d06b5abd4e5e44bff55d0a05cc2.tar
drakx-aa3db47fe4d77d06b5abd4e5e44bff55d0a05cc2.tar.gz
drakx-aa3db47fe4d77d06b5abd4e5e44bff55d0a05cc2.tar.bz2
drakx-aa3db47fe4d77d06b5abd4e5e44bff55d0a05cc2.tar.xz
drakx-aa3db47fe4d77d06b5abd4e5e44bff55d0a05cc2.zip
(_gtk__WrappedLabel) enable to override wrapping parameter (usefull for higher level widgets)
Diffstat (limited to 'perl-install/mygtk2.pm')
-rw-r--r--perl-install/mygtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index 51324158e..bcd1adb08 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -350,7 +350,7 @@ sub _gtk__Image {
sub _gtk__WrappedLabel {
my ($w, $opts) = @_;
- $opts->{line_wrap} = 1;
+ $opts->{line_wrap} = 1 if not defined $opts->{line_wrap};
_gtk__Label($w, $opts);
}