branch master updated: services: cuirass: Reverse the no-publish logic.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

mothacehe pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new cfd2442  services: cuirass: Reverse the no-publish logic.
cfd2442 is described below

commit cfd2442488971420289a12d5ca8f07816e1149bf
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Fri Aug 13 13:44:06 2021 +0200

    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.
---
 doc/guix.texi            |  8 ++++----
 gnu/services/cuirass.scm | 12 ++++++------
 2 files changed, 10 insertions(+), 10 deletions(-)

diff --git a/doc/guix.texi b/doc/guix.texi
index 78c1c09..6ba5262 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 34564b3..83e63fe 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="