diff options
| -rw-r--r-- | perl-install/any.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 3b3be9378..a45162a4b 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -470,6 +470,8 @@ sub set_autologin { } setVarsInSh("$::prefix/etc/sysconfig/autologin", { USER => $user, AUTOLOGIN => bool2yesno($user), EXEC => "/usr/X11R6/bin/startx.autologin" }); + run_program::rooted($::prefix, "/bin/chmod", 644, "$::prefix/etc/sysconfig/autologin") + or log::l("warning: unable to set \"$::prefix/etc/sysconfig/autologin\" permissions"); log::l("cat $::prefix/etc/sysconfig/autologin ($user):\n", cat_("$::prefix/etc/sysconfig/autologin")); } |