summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/draksplash9
1 files changed, 4 insertions, 5 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash
index d43080708..6686f8cde 100755
--- a/perl-install/standalone/draksplash
+++ b/perl-install/standalone/draksplash
@@ -310,11 +310,10 @@ sub which_res_exist() {
chdir($thm_path.$theme{name}."/images/");
my $is_ok = 0;
foreach (@{$first{widget}{combo}{res}}) {
- -f "bootsplash-$_.jpg"
- and $is_ok = 1
- and $first{widgets}{combo}{res}->entry->set_text($_)
- and last;
-
+ next if !-f "bootsplash-$_.jpg";
+ $is_ok = 1;
+ $first{widgets}{combo}{res}->entry->set_text($_);
+ last;
}
$is_ok == 1 or $in->ask_warn(N("Notice"), N("This theme does not yet have a bootsplash in %s !", $theme{res}{res})) and return 0;
return 1;