diff options
| author | Mathieu Othacehe <othacehe@gnu.org> | 2021-08-13 13:44:06 +0200 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2021-08-13 13:46:21 +0200 |
| commit | cfd2442488971420289a12d5ca8f07816e1149bf (patch) | |
| tree | cafd974d30d9d602b9ff6faaeb088e28f1e6820a | |
| parent | 2caf9eafb6f4703d8f1af42123093f4a7f7a32ce (diff) | |
| download | guix-cfd2442488971420289a12d5ca8f07816e1149bf.tar.gz | |
services: cuirass: Reverse the no-publish logic.
This is a follow-up of d128c6fd33f46ec4e2d0ef352d20a858c377bf6f. * gnu/services/cuirass.scm (<cuirass-remote-server-configuration>) [no-publish?]: Rename it to ... [publish?]: ... this new field. (cuirass-shepherd-service): Adapt it. * doc/guix.texi (Cuirass remote building): Document it.
| -rw-r--r-- | doc/guix.texi | 8 | ||||
| -rw-r--r-- | gnu/services/cuirass.scm | 12 |
2 files changed, 10 insertions, 10 deletions
diff --git a/doc/guix.texi b/doc/guix.texi index 78c1c09858..6ba52623c0 100644 --- a/doc/guix.texi +++ b/doc/guix.texi @@ -27889,10 +27889,10 @@ Use @var{cache} directory to cache build log files. Once a substitute is successfully fetched, trigger substitute baking at @var{trigger-url}. -@item @code{no-publish} (default: @code{#f}) -Do not start a publish server and ignore the @code{publish-port} -argument. This can be useful if there is already a standalone publish -server standing next to the remote server. +@item @code{publish?} (default: @code{#t}) +If set to false, do not start a publish server and ignore the +@code{publish-port} argument. This can be useful if there is already a +standalone publish server standing next to the remote server. @item @code{public-key} @item @code{private-key} diff --git a/gnu/services/cuirass.scm b/gnu/services/cuirass.scm index 34564b3894..83e63fe79c 100644 --- a/gnu/services/cuirass.scm +++ b/gnu/services/cuirass.scm @@ -73,8 +73,8 @@ (default "/var/log/cuirass-remote-server.log")) (cache cuirass-remote-server-configuration-cache ;string (default "/var/cache/cuirass/remote/")) - (no-publish? cuirass-remote-server-configuration-no-publish? ;boolean - (default #f)) + (publish? cuirass-remote-server-configuration-publish? ;boolean + (default #t)) (trigger-url cuirass-remote-server-trigger-url ;string (default #f)) (public-key cuirass-remote-server-configuration-public-key ;string @@ -194,7 +194,7 @@ (stop #~(make-kill-destructor))) ,@(if remote-server (match-record remote-server <cuirass-remote-server-configuration> - (backend-port publish-port log-file cache no-publish? + (backend-port publish-port log-file cache publish? trigger-url public-key private-key) (list (shepherd-service @@ -228,9 +228,9 @@ "--trigger-substitute-url=" trigger-url)) '()) - #$@(if no-publish? - (list "--no-publish") - '()) + #$@(if publish? + '() + (list "--no-publish")) #$@(if public-key (list (string-append "--public-key=" |