me/guix
Archived
1
0
Fork 0
Code Activity

environment: Set USER and LOGNAME in container

Browse source 
* guix/scripts/environment.scm (launch-environment/container): Set
  username environment variables.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Lars-Dominik Braun 2020-08-25 10:52:21 +02:00 • committed by Ludovic Courtès
parent 769b948f7f
commit bc8be17c4d
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
guix/scripts/environment.scm
View file

@ -477,6 +477,7 @@ WHILE-LIST."
(group-entry (gid 65534) ;the overflow GID (group-entry (gid 65534) ;the overflow GID
(name "overflow")))) (name "overflow"))))
(home-dir (password-entry-directory passwd)) (home-dir (password-entry-directory passwd))
(logname (password-entry-name passwd))
(environ (filter (match-lambda (environ (filter (match-lambda
((variable . value) ((variable . value)
(find (cut regexp-exec <> variable) (find (cut regexp-exec <> variable)
@ -528,6 +529,10 @@ WHILE-LIST."
;; The same variables as in Nix's 'build.cc'. ;; The same variables as in Nix's 'build.cc'.
'("TMPDIR" "TEMPDIR" "TMP" "TEMP")) '("TMPDIR" "TEMPDIR" "TMP" "TEMP"))
;; Some programs expect USER and/or LOGNAME to be set.
(setenv "LOGNAME" logname)
(setenv "USER" logname)
;; Create a dummy home directory. ;; Create a dummy home directory.
(mkdir-p home-dir) (mkdir-p home-dir)
(setenv "HOME" home-dir) (setenv "HOME" home-dir)