summaryrefslogtreecommitdiff
path: root/guix/import
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2024-01-22 12:44:46 +0100
committerRicardo Wurmus <rekado@elephly.net>2024-01-22 13:54:44 +0100
commit389c6082a440238accdd4e2df864135004dbb806 (patch)
treef8f8627b72a17cb4136b31ecc1b1c553663e6b64 /guix/import
parent29353820f2df8e4434bbdae2d36b36d0151cc027 (diff)
import/cran: Set HOME when ExperimentHub is among the inputs.
* guix/import/cran.scm (phases-for-inputs): Add 'set-HOME phase when ExperimentHub is among inputs. Change-Id: Ie3a2443934704eed8694a76a651b806209722421
Diffstat (limited to 'guix/import')
-rw-r--r--guix/import/cran.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/import/cran.scm b/guix/import/cran.scm
index d49bd96c9a..db9250faec 100644
--- a/guix/import/cran.scm
+++ b/guix/import/cran.scm
@@ -677,7 +677,9 @@ of META, a package in REPOSITORY."
of package names for all input packages."
(let ((rules
(list (lambda ()
- (and (member "styler" input-names)
+ (and (any (lambda (name)
+ (member name '("styler" "ExperimentHub")))
+ input-names)
'(add-after 'unpack 'set-HOME
(lambda _ (setenv "HOME" "/tmp")))))
(lambda ()