From 7f00fea6c35460d79eaa78fca2c9d0b039daa11d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 16 Mar 2004 12:24:27 +0000
Subject: (interactive_mode) better style

---
 perl-install/standalone/drakfont | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index abd0fc72d..e0a77320a 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -469,11 +469,13 @@ sub interactive_mode() {
     $interactive = 1;
     $window1 = ugtk2->new('drakfont');
     $window1->{rwindow}->signal_connect(delete_event => sub { ugtk2->exit(0) });
-    unless ($::isEmbedded) {
+    if ($::isEmbedded) {
+        $::Plug->set_icon(gtkcreate_pixbuf("drakfont"));
+    } else {
         $window1->{rwindow}->set_position('center');
         $window1->{rwindow}->set_title(N("DrakFont"));
         $window1->{window}->set_icon(gtkcreate_pixbuf("drakfont"));
-    } else { $::Plug->set_icon(gtkcreate_pixbuf("drakfont")) }
+    }
     
     my $button = {};
     my $disable = sub { my ($b) = @_; $button->{$_}->set_sensitive($_ ne $b) foreach keys %$button };
-- 
cgit v1.2.1