diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-09-16 19:58:16 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-09-16 19:58:16 +0000 |
commit | c38303069f287b4ffb91b2ca9f63614e1ecaec9b (patch) | |
tree | 0c618f466a01b60e048c0ea7061cee215bb7d87d /perl-install | |
parent | 5cbf48d3e82d00d259b3dae594016ed26dfeab14 (diff) | |
download | drakx-c38303069f287b4ffb91b2ca9f63614e1ecaec9b.tar drakx-c38303069f287b4ffb91b2ca9f63614e1ecaec9b.tar.gz drakx-c38303069f287b4ffb91b2ca9f63614e1ecaec9b.tar.bz2 drakx-c38303069f287b4ffb91b2ca9f63614e1ecaec9b.tar.xz drakx-c38303069f287b4ffb91b2ca9f63614e1ecaec9b.zip |
(_gtk__ScrolledWindow) fix scrolled windows for WebKit
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/mygtk2.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm index e800889c3..55abf2ead 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -571,7 +571,7 @@ sub _gtk__ScrolledWindow { my $faked_w = $w; if (my $child = delete $opts->{child}) { - if (member(ref($child), qw(Gtk2::Layout Gtk2::Html2::View Gtk2::SimpleList Gtk2::SourceView::View Gtk2::Text Gtk2::TextView Gtk2::TreeView))) { + if (member(ref($child), qw(Gtk2::Layout Gtk2::Html2::View Gtk2::SimpleList Gtk2::SourceView::View Gtk2::Text Gtk2::TextView Gtk2::TreeView Gtk2::WebKit::WebView))) { $w->add($child); } else { $w->add_with_viewport($child); @@ -586,7 +586,7 @@ sub _gtk__ScrolledWindow { $child->{to_bottom} = _allow_scroll_TextView_to_bottom($w, $child); } - if ($action eq 'gtknew' && ref($child) =~ /Gtk2::SimpleList|Gtk2::Html2|Gtk2::TextView|Gtk2::TreeView/) { + if ($action eq 'gtknew' && ref($child) =~ /Gtk2::SimpleList|Gtk2::Html2|Gtk2::TextView|Gtk2::TreeView|Gtk2::WebKit::WebView/) { $faked_w = gtknew('Frame', shadow_type => 'in', child => $w); } } |