diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-08-18 13:43:06 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-08-18 13:43:06 +0000 |
commit | e241da0e6c74fd60ecc5e419e19d25e9406dacaa (patch) | |
tree | 3a02941fdc07f1c0a2a7a96b2356509cd2792515 /perl-install/mygtk2.pm | |
parent | 2d0540a0bc8565260c8ed0122dce5fb86e1d7c0b (diff) | |
download | drakx-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar drakx-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar.gz drakx-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar.bz2 drakx-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar.xz drakx-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.zip |
(_gtk__ScrolledWindow) stop override left margin if already set to a
sane value
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 63599757b..184dc1312 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -523,7 +523,7 @@ sub _gtk__ScrolledWindow { $w->add_with_viewport($child); } $child->set_focus_vadjustment($w->get_vadjustment) if $child->can('set_focus_vadjustment'); - $child->set_left_margin(6) if ref($child) =~ /Gtk2::TextView/; + $child->set_left_margin(6) if ref($child) =~ /Gtk2::TextView/ && $child->get_left_margin() <= 6; $child->show; $w->child->set_shadow_type(delete $opts->{shadow_type}) if exists $opts->{shadow_type}; |