From 4bc1730a669602f59e60f35910817b242397b60b Mon Sep 17 00:00:00 2001 From: damien Date: Thu, 30 Aug 2001 17:21:40 +0000 Subject: corrected icon display --- perl-install/interactive.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/interactive.pm') diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index d4b331ef5..e8ef2d944 100644 --- a/perl-install/interactive.pm +++ b/perl-install/interactive.pm @@ -74,7 +74,7 @@ sub vnew { eval { require interactive_gtk }; if (!$@) { my $o = interactive_gtk->new; - if ($icon && $icon != 'default' && !$::isWizard) { $o->{icon} = $icon } else { undef $o->{icon} } + if ($icon && $icon ne 'default' && !$::isWizard) { $o->{icon} = $icon } else { undef $o->{icon} } return $o; } } -- cgit v1.2.1