summaryrefslogtreecommitdiffstats
path: root/perl-install/install_gtk.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_gtk.pm')
-rw-r--r--perl-install/install_gtk.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index e4d0ae824..b95063f92 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -195,14 +195,13 @@ sub create_logo_window {
mygtk2::may_destroy($o->{logo_window});
my $file = $o->{meta_class} eq 'firewall' ? "logo-mandrake-Firewall.png" : "logo-mandrake.png";
- -r $file or $file = "$ENV{SHARE_PATH}/$file";
my $w = bless {}, 'ugtk2';
$w->{rwindow} = $w->{window} =
gtknew('Window',
width => $::logowidth, height => $::logoheight,
title => 'skip', widget_name => 'logo',
- if_(-r $file, child => gtknew('Image', file => $file)),
+ child => gtknew('Image', file => $file),
);
$w->show;
$o->{logo_window} = $w;