From e6d3af5c9852c3c2856432d04ec86605e95dfb9d Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Mon, 13 Aug 2001 18:42:28 +0000
Subject: corrected 'no icon'

---
 perl-install/interactive.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 045ec844c..346026645 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -73,7 +73,7 @@ sub vnew {
 	eval { require interactive_gtk };
 	if (!$@) {
 	    my $o = interactive_gtk->new;
-	    $icon && !$::isWizard and $o->{icon} = $icon;
+	    $icon && $icon != "default" && !$::isWizard and $o->{icon} = $icon;
 	    return $o;
 	}
     }
-- 
cgit v1.2.1