guix build: Use 'map/accumulate-builds'.

* guix/scripts/build.scm (options->derivations): Use
'map/accumulate-builds' instead of 'append-map'.
This commit is contained in:
Ludovic Courtès 2020-03-25 12:42:54 +01:00
parent c40bf5816c
commit 1213ea9bd9
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 2 deletions

View File

@ -920,8 +920,10 @@ build."
(with-unbound-variable-handling
(parameterize ((%graft? graft?))
(append-map (lambda (system)
(append-map (cut compute-derivation <> system)
things-to-build))
(concatenate
(map/accumulate-builds store
(cut compute-derivation <> system)
things-to-build)))
systems))))
(define (show-build-log store file urls)