diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-09-11 15:08:19 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-09-11 15:08:19 +0000 |
commit | aa3db47fe4d77d06b5abd4e5e44bff55d0a05cc2 (patch) | |
tree | b4981d70640c891e1c28cd07a00f473e88d3ff0d /perl-install/mygtk2.pm | |
parent | 70c79d64b40d992cc18ed971d939c9c78eb0543c (diff) | |
download | drakx-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.pm | 2 |
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); } |