diff options
Diffstat (limited to 'guix-build-coordinator/utils.scm')
-rw-r--r-- | guix-build-coordinator/utils.scm | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/guix-build-coordinator/utils.scm b/guix-build-coordinator/utils.scm index 0dd1473..a0f13ad 100644 --- a/guix-build-coordinator/utils.scm +++ b/guix-build-coordinator/utils.scm @@ -324,10 +324,14 @@ upcoming chunk." (catch #t (lambda () (with-store store - (set-build-options store - #:print-extended-build-trace? #t - #:multiplexed-build-output? #t - #:substitute-urls substitute-urls) + (apply set-build-options + store + `(#:print-extended-build-trace? #t + #:multiplexed-build-output? #t + ,@(if substitute-urls + `(#:substitute-urls ,substitute-urls) + '()))) + (with-status-report (lambda (event status new) (print-build-event event status new) |