diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-05 11:42:49 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-05 11:42:49 +0000 |
| commit | 12a1d2d4758064e43aae4408e3076530fee36639 (patch) | |
| tree | a1bef828bd97517e64e1847bba0f73b9d4074c55 /perl-install/bootlook.pm | |
| parent | f3ca2cdee611a2ccce087701eaad44c8cc57bf48 (diff) | |
| download | drakx-backup-do-not-use-12a1d2d4758064e43aae4408e3076530fee36639.tar drakx-backup-do-not-use-12a1d2d4758064e43aae4408e3076530fee36639.tar.gz drakx-backup-do-not-use-12a1d2d4758064e43aae4408e3076530fee36639.tar.bz2 drakx-backup-do-not-use-12a1d2d4758064e43aae4408e3076530fee36639.tar.xz drakx-backup-do-not-use-12a1d2d4758064e43aae4408e3076530fee36639.zip | |
fix typo, be perl_checker compatible
Diffstat (limited to 'perl-install/bootlook.pm')
| -rw-r--r-- | perl-install/bootlook.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm index 58f318316..a774bb56a 100644 --- a/perl-install/bootlook.pm +++ b/perl-install/bootlook.pm @@ -48,6 +48,7 @@ parse_etc_passwd(); my $no_bootsplash; my $x_mode = any::runlevel() == 5; my $a_mode = -e "/etc/aurora/Monitor" ? 1 : 0; +my $auto_mode = any::get_autologin(); my $inmain = 0; my $lilogrub = chomp_(`detectloader -q`); @@ -111,8 +112,8 @@ if (member( $cur_res, qw( 785 788 791 794))) { #- and check that lilo is the correct loader $no_bootsplash ||= chomp_(`detectloader -q`) ne 'LILO'; my @thms; -my @lilo_thms = ($themes{default} ? () : qw(default)); -my @boot_thms = ($themes{default} ? () : qw(default)); +my @lilo_thms = if_(!$themes{default}, qw(default)); +my @boot_thms = if_(!$themes{default}, qw(default)); chdir($themes{path}); #- we must change directory for correct @thms assignement foreach (all('.')) { if (-d $themes{path} . $_ && m/^[^.]/) { |