summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-06 06:29:04 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-06 06:29:04 +0000
commitcc7719684814fdeaa77eeadf79bc45d88a34f78d (patch)
treecf42865cff5df2b7161dedc66a83d1523f0db076 /perl-install/ugtk2.pm
parent6ad8b0c504a0f6a2febc05d6af89c4d0fc2c1e9c (diff)
downloaddrakx-cc7719684814fdeaa77eeadf79bc45d88a34f78d.tar
drakx-cc7719684814fdeaa77eeadf79bc45d88a34f78d.tar.gz
drakx-cc7719684814fdeaa77eeadf79bc45d88a34f78d.tar.bz2
drakx-cc7719684814fdeaa77eeadf79bc45d88a34f78d.tar.xz
drakx-cc7719684814fdeaa77eeadf79bc45d88a34f78d.zip
(create_scrolled_window) adding 6px as left margin for TextView in scrolled Window
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index c8475ed5b..562247d02 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -287,6 +287,7 @@ sub create_scrolled_window {
}
$o_viewport_shadow and gtkset_shadow_type($w->child, $o_viewport_shadow);
$W->can('set_focus_vadjustment') and $W->set_focus_vadjustment($w->get_vadjustment);
+ $W->set_left_margin(6) if ref($W) =~ /Gtk2::TextView/;
$W->show;
if (ref($W) =~ /Gtk2::TextView|Gtk2::TreeView/) {
gtkadd(gtkset_shadow_type(Gtk2::Frame->new, 'in'), $w)