summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-03-13 08:56:17 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-03-13 08:56:17 +0000
commitb30b2cfa0275bf45a89c009469e847c381be68d7 (patch)
tree02b460262ec194d6e1e2f87569ba1a640a2e7d86 /perl-install
parentc937a9a3d4358ce1ae39ad2924109d377ceeb094 (diff)
downloaddrakx-b30b2cfa0275bf45a89c009469e847c381be68d7.tar
drakx-b30b2cfa0275bf45a89c009469e847c381be68d7.tar.gz
drakx-b30b2cfa0275bf45a89c009469e847c381be68d7.tar.bz2
drakx-b30b2cfa0275bf45a89c009469e847c381be68d7.tar.xz
drakx-b30b2cfa0275bf45a89c009469e847c381be68d7.zip
fix #3161 (ensure right permissions on /etc/sysconfig/autologin for
bad root umask case)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm2
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"));
}