From bdf8f87a79d342ac6d60ea3d77782db140038371 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Thu, 24 Jul 2008 17:29:46 +0000
Subject: (create_logo_window) rename as create_logo(), only creating an image
 now

---
 perl-install/install/gtk.pm | 15 ++-------------
 1 file changed, 2 insertions(+), 13 deletions(-)

(limited to 'perl-install/install')

diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index ba47a901b..5bf72b50d 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -156,22 +156,11 @@ sub update_steps_position {
 }
 
 #------------------------------------------------------------------------------
-sub create_logo_window {
+sub create_logo {
     my ($o) = @_;
 
     return if $::logowidth == 0;
-
-    mygtk2::may_destroy($o->{logo_window});
-
-    my $file = "logo-mandriva.png";
-
-    $o->{logo_window} =
-      gtknew('Window', 
-	     width => $::logowidth, height => $::logoheight, 
-	     widget_name => 'logo',
-	     child => gtknew('Image', file => $file),
-	 );
-    $o->{logo_window}->show;
+    gtknew('Image', file => 'logo-mandriva.png');
 }
 
 #------------------------------------------------------------------------------
-- 
cgit v1.2.1