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.pm9
1 files changed, 6 insertions, 3 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 89ccdcd6b..98e3c0d56 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -678,9 +678,12 @@ sub set_autologin {
my $do_autologin = bool2text($autologin->{user});
$autologin->{dm} ||= 'xdm';
- $do_pkgs->ensure_is_installed($autologin->{dm});
- $do_pkgs->ensure_is_installed('autologin', '/usr/bin/startx.autologin')
- if $autologin->{user} && $autologin->{dm} eq 'xdm';
+ $do_pkgs->ensure_is_installed($autologin->{dm})
+ or return;
+ if ($autologin->{user} && $autologin->{dm} eq 'xdm') {
+ $do_pkgs->ensure_is_installed('autologin', '/usr/bin/startx.autologin')
+ or return;
+ }
#- Configure KDM / MDKKDM
my $kdm_conffile = common::read_alternative('kdm4-config');