2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/guix-cuirass.git synced 2023-12-14 06:03:04 +01:00

base: Send build output to the bit bucket.

Fixes a regression introduced in
a42cf16fec whereby build logs would go the
Cuirass' stderr.

* src/cuirass/base.scm (build-packages): Parameterize
'current-build-output-port' to a void output port.
This commit is contained in:
Ludovic Courtès 2017-06-04 22:11:46 +02:00
parent 870e8d6ad3
commit 7f8029d33c

View file

@ -153,12 +153,15 @@ if required. Return the last commit ID on success, #f otherwise."
build))
;; Pass all the jobs at once so we benefit from as much parallelism as
;; possible (we must be using #:keep-going? #t). Swallow build errors.
;; possible (we must be using #:keep-going? #t). Swallow build logs (the
;; daemon keeps them anyway), and swallow build errors.
(guard (c ((nix-protocol-error? c) #t))
(format #t "building ~a derivations...~%" (length jobs))
(build-derivations store (map (λ (job)
(assq-ref job #:derivation))
jobs)))
(parameterize ((current-build-output-port (%make-void-port "w")))
(build-derivations store
(map (λ (job)
(assq-ref job #:derivation))
jobs))))
;; Register the results in the database.
;; XXX: The 'build-derivations' call is blocking so we end updating the