From 7aa9e2a72659ed03d8f33b5493c1477344d68082 Mon Sep 17 00:00:00 2001
From: Pascal Terjan <pterjan@mandriva.org>
Date: Wed, 12 Aug 2009 08:57:12 +0000
Subject: fix window creation (#52812)

---
 perl-install/NEWS      | 1 +
 perl-install/mygtk2.pm | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/NEWS b/perl-install/NEWS
index b15a39d78..761cba3aa 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -2,6 +2,7 @@
   aka since November 24 2008)
 - localedrake
   o add "English (South Africa)" (#51057)
+- fix window creation (#52812)
 
 Version 12.43 - 10 August 2009 
 
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index b62f29eec..dc315f50c 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -1217,8 +1217,6 @@ sub _create_Window {
 	} 
     });
 
-    $w->present();
-
     if ($::isInstall && !$::isStandalone) {
 	require install::gtk; #- for perl_checker
 	install::gtk::handle_unsafe_mouse($::o, $w);
@@ -1242,6 +1240,8 @@ sub _create_Window {
 	}) if $special_center;
     }
 
+    $w->present() if $no_Window_Manager;
+
     $w;
 }
 
-- 
cgit v1.2.1