summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-08 09:04:23 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-08 09:04:23 +0000
commitbbb898ebb72bf81ad27f593f4ffb627571847eec (patch)
tree90ea4853504afcdd22eb7a065fc3961b97ae831e /perl-install
parentf45cf1bf38126501a2b0cf4a17cfea37a72f919f (diff)
downloaddrakx-bbb898ebb72bf81ad27f593f4ffb627571847eec.tar
drakx-bbb898ebb72bf81ad27f593f4ffb627571847eec.tar.gz
drakx-bbb898ebb72bf81ad27f593f4ffb627571847eec.tar.bz2
drakx-bbb898ebb72bf81ad27f593f4ffb627571847eec.tar.xz
drakx-bbb898ebb72bf81ad27f593f4ffb627571847eec.zip
(which_res_exist) unjonathan-ize
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;