diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-03-05 14:17:21 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-03-05 14:17:21 +0000 |
| commit | 0bb6afa215fff585416bc88aa967c7e1eb61672e (patch) | |
| tree | 87a6aae21ffdfa6176aff92b9af29a0ce4209060 /perl-install/my_gtk.pm | |
| parent | 48b4c7ddf34502c7d75980f740a1ca6c406ed0e8 (diff) | |
| download | drakx-0bb6afa215fff585416bc88aa967c7e1eb61672e.tar drakx-0bb6afa215fff585416bc88aa967c7e1eb61672e.tar.gz drakx-0bb6afa215fff585416bc88aa967c7e1eb61672e.tar.bz2 drakx-0bb6afa215fff585416bc88aa967c7e1eb61672e.tar.xz drakx-0bb6afa215fff585416bc88aa967c7e1eb61672e.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/my_gtk.pm')
| -rw-r--r-- | perl-install/my_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm index 9cf9a7551..89944f342 100644 --- a/perl-install/my_gtk.pm +++ b/perl-install/my_gtk.pm @@ -459,7 +459,7 @@ sub _ask_from_list { my $leave = sub { $o->{retval} = $l->[$curr]; Gtk->main_quit }; my $select = sub { - $list->focus_row($_[0]); + $list->set_focus_row($_[0]); $list->select_row($_[0], 0); $list->moveto($_[0], 0, 0.5, 0); }; |