1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index b61cb2849..9d703befe 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -360,7 +360,7 @@ sub pack_passwd {
 sub get_autologin {
     my ($prefix, $o) = @_;
     my %l = getVarsFromSh("$prefix/etc/sysconfig/autologin");
-    $o->{autologin} ||= $l{USER};
+    $o->{autologin} ||= text2bool($l{AUTOLOGIN}) && $l{USER};
     %l = getVarsFromSh("$prefix/etc/sysconfig/desktop");
     $o->{desktop} ||= $l{DESKTOP};
 }