diff options
author | Josselin Poiret <dev@jpoiret.xyz> | 2022-01-15 14:49:58 +0100 |
---|---|---|
committer | Mathieu Othacehe <othacehe@gnu.org> | 2022-01-17 08:27:22 +0100 |
commit | 946420276f5374968030fa80ea4d69e57b8514f4 (patch) | |
tree | efda0d0478c70f4507374f14313280b51cca8661 | |
parent | 8ee099abe05d32989beb5174fb717669732a9894 (diff) | |
download | guix-946420276f5374968030fa80ea4d69e57b8514f4.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. |