nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

system: Provide a fall-back PATH for non-login shells started with su(1). 

* gnu/system.scm (operating-system-etc-service): Provide values for
ENV_PATH and ENV_SUPATH in '/etc/login.defs'.
This commit is contained in:
Leo Famulari 2018-04-08 14:30:05 -04:00
parent 87a841b2d4
commit e453da132a
No known key found for this signature in database
GPG Key ID: 2646FA30BACA7F08
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
gnu/system.scm
View File

@ -571,7 +571,16 @@ This is the GNU system. Welcome.\n")
(define* (operating-system-etc-service os) (define* (operating-system-etc-service os)
"Return a <service> that builds containing the static part of the /etc "Return a <service> that builds containing the static part of the /etc
directory." directory."
(let ((login.defs (plain-file "login.defs" "# Empty for now.\n")) (let ((login.defs
(plain-file "login.defs"
(string-append
"# Default paths for non-login shells started by su(1).\n"
"ENV_PATH /run/setuid-programs:"
"/run/current-system/profile/bin:"
"/run/current-system/profile/sbin\n"
"ENV_SUPATH /run/setuid-programs:"
"/run/current-system/profile/bin:"
"/run/current-system/profile/sbin\n")))
(issue (plain-file "issue" (operating-system-issue os))) (issue (plain-file "issue" (operating-system-issue os)))
(nsswitch (plain-file "nsswitch.conf" (nsswitch (plain-file "nsswitch.conf"