1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

Revert "build-self: Let HOME pass through the execution environment."

This reverts commit 48d498c2c3.
It breaks ‘guix pull’.
This commit is contained in:
Tobias Geerinckx-Rice
2019-05-11 23:34:42 +02:00
parent 6bf795329a
commit cbe7c99e71

View File

@@ -399,7 +399,6 @@ files."
(mlet %store-monad ((build (build-program source version guile-version
#:pull-version pull-version))
(system (if system (return system) (current-system)))
(home (getenv "HOME"))
;; Note: Use the deprecated names here because the
;; caller might be Guix <= 0.16.0.
@@ -420,9 +419,6 @@ files."
;; $GUILE_LOAD_PATH & co.
(with-clean-environment
(setenv "GUILE_WARN_DEPRECATED" "no") ;be quiet and drive
(when home
;; Inherit HOME so that 'xdg-directory' works.
(setenv "HOME" home))
(open-pipe* OPEN_READ
(derivation->output-path build)
source system version