From b89f1780a785c6d064cd2c1fa5523d7e4545fbbb Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 2 Mar 2005 11:05:55 +0000 Subject: (create_scrolled_window) Gtk2::Html::View has native scrolling support and thus behave badly with GtkViewport --- perl-install/ugtk2.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/ugtk2.pm') diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 10d5b4aa3..57f54acf8 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -270,7 +270,7 @@ sub create_scrolled_window { my ($W, $o_policy, $o_viewport_shadow) = @_; my $w = Gtk2::ScrolledWindow->new(undef, undef); $w->set_policy($o_policy ? @$o_policy : ('automatic', 'automatic')); - if (member(ref($W), qw(Gtk2::Layout Gtk2::Text Gtk2::TextView Gtk2::TreeView))) { + if (member(ref($W), qw(Gtk2::Layout Gtk2::Html2::View Gtk2::Text Gtk2::TextView Gtk2::TreeView))) { $w->add($W); } else { $w->add_with_viewport($W); -- cgit v1.2.1