diff options
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install2.pm | 2 | ||||
-rw-r--r-- | perl-install/interactive.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index b8ddbb3d3..392ad4c3b 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -544,7 +544,7 @@ sub main { MAIN: for ($o->{step} = $o->{steps}{first};; $o->{step} = getNextStep()) { $o->{steps}{$o->{step}}{entered}++; $o->enteringStep($o->{step}); - $o->{steps}{$o->{step}}{icon} and $o->{icon} = $o->{steps}{$o->{step}}{icon}; + $o->{steps}{$o->{step}}{icon} && $o->{steps}{$o->{step}}{icon} != 'default' and $o->{icon} = $o->{steps}{$o->{step}}{icon}; eval { &{$install2::{$o->{step}}}($clicked || $o->{steps}{$o->{step}}{noauto}, $o->{steps}{$o->{step}}{entered}, diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index 0f2541943..0f5aabc22 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; - $icon && $icon != "default" && !$::isWizard and $o->{icon} = $icon; + $icon && $icon != 'default' && !$::isWizard and $o->{icon} = $icon; return $o; } } |