deploy: Use 'map/accumulate-builds'.
* guix/scripts/deploy.scm (guix-deploy): Use 'map/accumulate-builds' instead of 'for-each'.
This commit is contained in:
parent
d089b23335
commit
18c8a4396b
@ -152,4 +152,6 @@ Perform the deployment specified by FILE.\n"))
|
||||
(with-build-handler (build-notifier #:use-substitutes?
|
||||
(assoc-ref opts 'substitutes?))
|
||||
(parameterize ((%graft? (assq-ref opts 'graft?)))
|
||||
(for-each (cut deploy-machine* store <>) machines)))))))
|
||||
(map/accumulate-builds store
|
||||
(cut deploy-machine* store <>)
|
||||
machines)))))))
|
||||
|
Loading…
Reference in New Issue
Block a user