From 3600a1fd1e9398fad208e3e94c6def2a8e84314a Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 26 Mar 2000 21:30:07 +0000
Subject: no_comment

---
 perl-install/my_gtk.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install/my_gtk.pm')

diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 5970a1e7c..40f82f4cd 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -219,6 +219,7 @@ sub createScrolledWindow($) {
     member(ref $W, qw(Gtk::CList Gtk::CTree Gtk::Text)) ?
       $w->add($W) :
       $w->add_with_viewport($W);
+    $W->can("set_focus_vadjustment") and $W->set_focus_vadjustment($w->get_vadjustment);
     $W->show;
     $w
 }
-- 
cgit v1.2.1