diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-05-14 16:53:42 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-05-14 17:21:27 +0200 |
commit | 80963744a242257921917df5a901dc343d3a93db (patch) | |
tree | 3adcc9e38387470f6dc153363833254015863301 /guix | |
parent | f52fbf7094c9c346d38ad469cc8d92d18387786e (diff) | |
download | gnu-guix-80963744a242257921917df5a901dc343d3a93db.tar gnu-guix-80963744a242257921917df5a901dc343d3a93db.tar.gz |
store: 'mapm/accumulate-builds' preserves '%current-target-system'.
Fixes <https://bugs.gnu.org/41182>.
* guix/store.scm (mapm/accumulate-builds): Pass #:system and #:target to
'run-with-store'.
* tests/store.scm ("mapm/accumulate-builds, %current-target-system"):
New test.
* tests/guix-pack.sh: Add 'guix pack -d --target' test.
Diffstat (limited to 'guix')
-rw-r--r-- | guix/store.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/store.scm b/guix/store.scm index 6c7c07fd2d..014d08aaec 100644 --- a/guix/store.scm +++ b/guix/store.scm @@ -1899,7 +1899,9 @@ coalesce them into a single call." (values (map/accumulate-builds store (lambda (obj) (run-with-store store - (mproc obj))) + (mproc obj) + #:system (%current-system) + #:target (%current-target-system))) lst) store))) |