diff options
author | Josselin Poiret <dev@jpoiret.xyz> | 2022-01-15 14:49:58 +0100 |
---|---|---|
committer | Mathieu Othacehe <othacehe@gnu.org> | 2022-02-02 16:46:43 +0100 |
commit | 2f7f1d11e9dd8dcf32c2f171f746f087e9354934 (patch) | |
tree | 35a23fb0428287fc8e1c5bfc4288d25c606d8ffc | |
parent | 438bf9b840695902bc9a214789276227a34e7669 (diff) | |
download | guix-2f7f1d11e9dd8dcf32c2f171f746f087e9354934.tar.gz |
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>
-rw-r--r-- | gnu/installer/final.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gnu/installer/final.scm b/gnu/installer/final.scm index fbfac1f692..7d5eca4c7e 100644 --- a/gnu/installer/final.scm +++ b/gnu/installer/final.scm @@ -169,7 +169,8 @@ or #f. Return #t on success and #f on failure." (database-dir "/var/guix/db") (database-file (string-append database-dir "/db.sqlite")) (saved-database (string-append database-dir "/db.save")) - (ret #f)) + (ret #f) + (path (getenv "PATH"))) (mkdir-p (%installer-target-dir)) ;; 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-error-port) 'none) + (setenv "PATH" path) + ;; If there are any connected clients, assume that we are running ;; installation tests. In that case, dump the standard and error ;; outputs to syslog. |