From dc5098edd98c85ad45d2e22ca1824a9445dcc36d Mon Sep 17 00:00:00 2001 From: Leo Famulari Date: Sun, 8 Apr 2018 14:30:05 -0400 Subject: [PATCH] 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'. --- gnu/system.scm | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/gnu/system.scm b/gnu/system.scm index 592a0ea58..1cf00aafc 100644 --- a/gnu/system.scm +++ b/gnu/system.scm @@ -571,7 +571,16 @@ This is the GNU system. Welcome.\n") (define* (operating-system-etc-service os) "Return a 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" -- 2.17.0