summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index eb7b86e06..33afd1743 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -705,15 +705,15 @@ sub is_standalone_autologin_needed {
}
sub set_autologin {
- my ($do_pkgs, $autologin) = @_;
+ my ($do_pkgs, $autologin, $o_auto) = @_;
log::l("set_autologin $autologin->{user} $autologin->{desktop}");
my $do_autologin = bool2text($autologin->{user});
$autologin->{dm} ||= 'xdm';
- $do_pkgs->ensure_is_installed($autologin->{dm})
+ $do_pkgs->ensure_is_installed($autologin->{dm}, undef, $o_auto)
or return;
if ($autologin->{user} && is_standalone_autologin_needed($autologin->{dm})) {
- $do_pkgs->ensure_is_installed('autologin', '/usr/bin/startx.autologin')
+ $do_pkgs->ensure_is_installed('autologin', '/usr/bin/startx.autologin', $o_auto)
or return;
}