05/18: installer: Keep PATH inside the install container.

[guix-commits]

mothacehe pushed a commit to branch wip-harden-installer
in repository guix.

commit 946420276f5374968030fa80ea4d69e57b8514f4
Author: Josselin Poiret <dev@jpoiret.xyz>
AuthorDate: Sat Jan 15 14:49:58 2022 +0100

    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>
---
 gnu/installer/final.scm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

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.