diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-09-02 14:29:27 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-09-02 14:29:27 +0000 |
commit | 0e04c715707174a9dcc1ab093c161853e93a5c8a (patch) | |
tree | 8968dbcd6a7122f3c64ab6f8aca566123e33e6e0 | |
parent | f1e185652fdf7b16a50d5350c043f8fd79c12216 (diff) | |
download | drakx-0e04c715707174a9dcc1ab093c161853e93a5c8a.tar drakx-0e04c715707174a9dcc1ab093c161853e93a5c8a.tar.gz drakx-0e04c715707174a9dcc1ab093c161853e93a5c8a.tar.bz2 drakx-0e04c715707174a9dcc1ab093c161853e93a5c8a.tar.xz drakx-0e04c715707174a9dcc1ab093c161853e93a5c8a.zip |
(_gtk__Label_Left) enable to override default padding
-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 825951ef9..1da429eec 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -358,7 +358,7 @@ sub _gtk__WrappedLabel { sub _gtk__Label_Left { my ($w, $opts) = @_; $opts->{alignment} ||= [ 0, 0 ]; - $opts->{padding} = [ $left_padding, 0 ]; + $opts->{padding} ||= [ $left_padding, 0 ]; _gtk__WrappedLabel($w, $opts); } |