ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 22:08:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: cuirass: Add log-file support.

Browse source 
* gnu/services/cuirass.scm (cuirass-remote-worker-shepherd-service): Add
log-file support.

Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
Mathieu Othacehe 2021-01-28 15:53:03 +01:00
parent eb9adede34
commit eff80711f3
No known key found for this signature in database
GPG key ID: 8354763531769CA6
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gnu/services/cuirass.scm
View file

@ -306,7 +306,7 @@ (define (cuirass-remote-worker-shepherd-service config)
"Return a <shepherd-service> for the Cuirass remote worker service with "Return a <shepherd-service> for the Cuirass remote worker service with
CONFIG." CONFIG."
(match-record config <cuirass-remote-worker-configuration> (match-record config <cuirass-remote-worker-configuration>
(cuirass workers systems publish-port public-key private-key) (cuirass workers systems log-file publish-port public-key private-key)
(list (shepherd-service (list (shepherd-service
(documentation "Run Cuirass remote build worker.") (documentation "Run Cuirass remote build worker.")
(provision '(cuirass-remote-worker)) (provision '(cuirass-remote-worker))
@ -334,7 +334,8 @@ (define (cuirass-remote-worker-shepherd-service config)
(list (list
(string-append "--private-key=" (string-append "--private-key="
private-key)) private-key))
'())))) '()))
#:log-file #$log-file))
(stop #~(make-kill-destructor)))))) (stop #~(make-kill-destructor))))))
(define cuirass-remote-worker-service-type (define cuirass-remote-worker-service-type