mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-12 06:06:53 -05:00
services: guix-build-coordinator: Fix passing parallel-hooks.
The previous approach didn't support a simple alist. * gnu/services/guix.scm (make-guix-build-coordinator-start-script): Fix passing parallel-hooks in to the start gexp.
This commit is contained in:
parent
430848c6bd
commit
e069de452a
1 changed files with 4 additions and 1 deletions
|
@ -309,7 +309,10 @@ (define* (make-guix-build-coordinator-start-script database-uri-string
|
||||||
#$agent-communication-uri-string)
|
#$agent-communication-uri-string)
|
||||||
#:client-communication-uri (string->uri
|
#:client-communication-uri (string->uri
|
||||||
#$client-communication-uri-string)
|
#$client-communication-uri-string)
|
||||||
#:parallel-hooks (list #$@parallel-hooks)))))
|
#:parallel-hooks (list #$@(map (match-lambda
|
||||||
|
((name . val)
|
||||||
|
#~(cons '#$name #$val)))
|
||||||
|
parallel-hooks))))))
|
||||||
#:guile guile))
|
#:guile guile))
|
||||||
|
|
||||||
(define (guix-build-coordinator-shepherd-services config)
|
(define (guix-build-coordinator-shepherd-services config)
|
||||||
|
|
Loading…
Reference in a new issue