me
/
guix
Archived
1
0
Fork 0
Code

installer: Keep PATH inside the install container. 

* gnu/installer/final.scm (install-system): Set PATH inside the
container.

Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
master
Josselin Poiret 2022-01-15 14:49:58 +01:00 committed by Mathieu Othacehe
parent 438bf9b840
commit 2f7f1d11e9
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gnu/installer/final.scm
View File

@ -169,7 +169,8 @@ or #f. Return #t on success and #f on failure."
(database-dir "/var/guix/db") (database-dir "/var/guix/db")
(database-file (string-append database-dir "/db.sqlite")) (database-file (string-append database-dir "/db.sqlite"))
(saved-database (string-append database-dir "/db.save")) (saved-database (string-append database-dir "/db.save"))
(ret #f)) (ret #f)
(path (getenv "PATH")))
(mkdir-p (%installer-target-dir)) (mkdir-p (%installer-target-dir))
;; We want to initialize user passwords but we don't want to store them in ;; We want to initialize user passwords but we don't want to store them in
@ -208,6 +209,8 @@ or #f. Return #t on success and #f on failure."
(setvbuf (current-output-port) 'none) (setvbuf (current-output-port) 'none)
(setvbuf (current-error-port) 'none) (setvbuf (current-error-port) 'none)
(setenv "PATH" path)
;; If there are any connected clients, assume that we are running ;; If there are any connected clients, assume that we are running
;; installation tests. In that case, dump the standard and error ;; installation tests. In that case, dump the standard and error
;; outputs to syslog. ;; outputs to syslog.