From c14c7fabfa34df8a28cd70af88c097a10cbfefc5 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 18 Jan 2005 17:05:12 +0000 Subject: fix broken focus during install --- perl-install/mygtk2.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm index b3d5eace6..852cd0a2c 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -684,6 +684,8 @@ sub _create_Window { $w->set_uposition(max(0, $::rootwidth - ($::windowwidth + $wi) / 2), max(0, $::logoheight + ($::windowheight - $he) / 2)); }); + #- without this, the focus is broken during install, though this is not needed during X test, why?? + $w->show; } $w; -- cgit v1.2.1