summaryrefslogtreecommitdiffstats
path: root/perl-install/mygtk2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-08-18 13:43:06 +0000
committerThierry Vignaud <tv@mandriva.org>2008-08-18 13:43:06 +0000
commite241da0e6c74fd60ecc5e419e19d25e9406dacaa (patch)
tree3a02941fdc07f1c0a2a7a96b2356509cd2792515 /perl-install/mygtk2.pm
parent2d0540a0bc8565260c8ed0122dce5fb86e1d7c0b (diff)
downloaddrakx-backup-do-not-use-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar
drakx-backup-do-not-use-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar.gz
drakx-backup-do-not-use-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar.bz2
drakx-backup-do-not-use-e241da0e6c74fd60ecc5e419e19d25e9406dacaa.tar.xz
drakx-backup-do-not-use-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.pm2
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};