summary refs log tree commit diff
diff options
context:
space:
mode:
authorJosselin Poiret <dev@jpoiret.xyz>2022-01-15 14:49:58 +0100
committerMathieu Othacehe <othacehe@gnu.org>2022-01-17 08:27:22 +0100
commit946420276f5374968030fa80ea4d69e57b8514f4 (patch)
treeefda0d0478c70f4507374f14313280b51cca8661
parent8ee099abe05d32989beb5174fb717669732a9894 (diff)
downloadguix-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.scm5
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.