summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-09-14 15:06:10 +0000
committerdamien <damien@mandriva.com>2001-09-14 15:06:10 +0000
commitd2d2f8b7361ec4d909ce3e466ec1705f37d7eb76 (patch)
treeec8b681a433c92f40a757c78759c5b9eeddbeb1e /perl-install
parent398331f6c77b4dfbe90196bf8ecc4e6df9129ff2 (diff)
downloaddrakx-d2d2f8b7361ec4d909ce3e466ec1705f37d7eb76.tar
drakx-d2d2f8b7361ec4d909ce3e466ec1705f37d7eb76.tar.gz
drakx-d2d2f8b7361ec4d909ce3e466ec1705f37d7eb76.tar.bz2
drakx-d2d2f8b7361ec4d909ce3e466ec1705f37d7eb76.tar.xz
drakx-d2d2f8b7361ec4d909ce3e466ec1705f37d7eb76.zip
iautologin correction
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootlook.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm
index 2781c29a2..cbad70b79 100644
--- a/perl-install/bootlook.pm
+++ b/perl-install/bootlook.pm
@@ -279,7 +279,8 @@ sub isAutologin {
$line =~ s/AUTOLOGIN=(yes|no)/$1/;
chomp ($line);
$line = ($line eq "yes");
- return ($line);
+ my %au = get_autologin('');
+ return ($line && $au{autologin} && $au{desktop});
}
sub get_autologin {