~ruther/guix-local

379b6ba5a906b62252dd5bcb142ec050ae34bc74 — Ludovic Courtès 9 years ago 4a78638
services: cuirass: Add 'cuirass' field.

* gnu/services/cuirass.scm (<cuirass-configuration>)[cuirass]: New
field.
(cuirass-shepherd-service): Honor it.
* doc/guix.texi (Continuous Integration): Document it.
2 files changed, 7 insertions(+), 1 deletions(-)

M doc/guix.texi
M gnu/services/cuirass.scm
M doc/guix.texi => doc/guix.texi +3 -0
@@ 12025,6 12025,9 @@ from source.

@item @code{one-shot?} (default: @code{#f})
Only evaluate specifications and build derivations once.

@item @code{cuirass} (default: @code{cuirass})
The Cuirass package to use.
@end table
@end deftp


M gnu/services/cuirass.scm => gnu/services/cuirass.scm +4 -1
@@ 43,6 43,8 @@
(define-record-type* <cuirass-configuration>
  cuirass-configuration make-cuirass-configuration
  cuirass-configuration?
  (cuirass          cuirass-configuration-cuirass ;package
                    (default cuirass))
  (log-file         cuirass-configuration-log-file ;string
                    (default "/var/log/cuirass.log"))
  (cache-directory  cuirass-configuration-cache-directory ;string (dir-name)


@@ 66,7 68,8 @@
  "Return a <shepherd-service> for the Cuirass service with CONFIG."
  (and
   (cuirass-configuration? config)
   (let ((cache-directory  (cuirass-configuration-cache-directory config))
   (let ((cuirass          (cuirass-configuration-cuirass config))
         (cache-directory  (cuirass-configuration-cache-directory config))
         (log-file         (cuirass-configuration-log-file config))
         (user             (cuirass-configuration-user config))
         (group            (cuirass-configuration-group config))