summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/steps.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm
index adc63d74f..8ad398c4c 100644
--- a/perl-install/install/steps.pm
+++ b/perl-install/install/steps.pm
@@ -721,9 +721,10 @@ sub addUser {
any::add_users($users, $o->{authentication});
- my $autologin = { user => $o->{autologin}, desktop => $o->{desktop} };
+ my $autologin = any::get_autologin();
+ $autologin->{user} = $o->{autologin};
+ $autologin->{desktop} = $o->{desktop} if $o->{desktop};
if ($autologin->{user}) {
- $autologin->{desktop} ||= first(any::sessions());
$o->pkg_install("autologin") if !member($autologin->{desktop}, 'KDE', 'KDE4', 'GNOME');
}
any::set_autologin($o->do_pkgs, $autologin);