summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakboot7
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot
index 50afc3429..128a66fe3 100755
--- a/perl-install/standalone/drakboot
+++ b/perl-install/standalone/drakboot
@@ -106,15 +106,12 @@ my $splash_mode = !$no_bootsplash;
my $keep_logo = 1;
if (-r $themes{sysconfig}) {
- my $SYSF;
- open $SYSF, $themes{sysconfig} or die "Can't open $themes{sysconfig}\n";
- while (<$SYSF>) {
- local $_;
+ local $_;
+ while (cat_("$themes{sysconfig}") {
/^SPLASH=no/ and $splash_mode = 0;
/^THEME=(.*)/ and -f "$themes{path}$1$themes{boot}{path}bootsplash-$cur_res.jpg" and $themes{default} = $1;
/^LOGO_CONSOLE=(.*)/ and $keep_logo = $1 ne 'no';
}
- close($SYSF);
}
my @boot_thms = if_(!$themes{default}, qw(default));