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:
parent
87a841b2d4
commit
e453da132a
|
@ -571,7 +571,16 @@ This is the GNU system. Welcome.\n")
|
|||
(define* (operating-system-etc-service os)
|
||||
"Return a <service> that builds containing the static part of the /etc
|
||||
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)))
|
||||
(nsswitch (plain-file "nsswitch.conf"
|
||||
|
|
Loading…
Reference in New Issue