services: cuirass: Remove 'cuirass-service' procedure.
* gnu/services/cuirass.scm (<cuirass-configuration>)[specifications]: Remove default value. (cuirass-service): Remove. * doc/guix.texi (Continuous Integration): Adjust accordingly.
This commit is contained in:
parent
8de938d59a
commit
231eddc88a
2 changed files with 16 additions and 24 deletions
|
@ -12011,21 +12011,16 @@ providing substitutes to others (@pxref{Substitutes}).
|
||||||
|
|
||||||
The @code{(gnu services cuirass)} module provides the following service.
|
The @code{(gnu services cuirass)} module provides the following service.
|
||||||
|
|
||||||
@deffn {Scheme Procedure} cuirass-service @
|
@defvr {Scheme Procedure} cuirass-service-type
|
||||||
[#:config @code{(cuirass-configuration)}]
|
The type of the Cuirass service. Its value must be a
|
||||||
Return a service that runs @command{cuirass}.
|
@code{cuirass-configuration} object, as described below.
|
||||||
|
@end defvr
|
||||||
|
|
||||||
The @var{#:config} keyword argument specifies the configuration for
|
To add build jobs, you have to set the @code{specifications} field of
|
||||||
@command{cuirass}, which must be a @code{<cuirass-configuration>}
|
the configuration. Here is an example of a service defining a build job
|
||||||
object, by default it doesn't provide any build job. If you want to
|
based on a specification that can be found in Cuirass source tree. This
|
||||||
provide your own configuration you will most likely use the
|
service polls the Guix repository and builds a subset of the Guix
|
||||||
@code{cuirass-configuration} special form which returns such objects.
|
packages, as prescribed in the @file{gnu-system.scm} example spec:
|
||||||
@end deffn
|
|
||||||
|
|
||||||
In order to add build jobs you will have to set the
|
|
||||||
@code{specifications} field. Here is an example of a cuirass service
|
|
||||||
defining a build job based on a specification that can be found in
|
|
||||||
Cuirass source tree.
|
|
||||||
|
|
||||||
@example
|
@example
|
||||||
(let ((spec #~((#:name . "guix")
|
(let ((spec #~((#:name . "guix")
|
||||||
|
@ -12042,11 +12037,12 @@ Cuirass source tree.
|
||||||
(#:proc . hydra-jobs)
|
(#:proc . hydra-jobs)
|
||||||
(#:arguments (subset . "hello"))
|
(#:arguments (subset . "hello"))
|
||||||
(#:branch . "master"))))
|
(#:branch . "master"))))
|
||||||
(cuirass-service #:config (cuirass-configuration
|
(service cuirass-service-type
|
||||||
(specifications #~(list #$spec)))))
|
(cuirass-configuration
|
||||||
|
(specifications #~(list #$spec)))))
|
||||||
@end example
|
@end example
|
||||||
|
|
||||||
While information related to build jobs are located directly in the
|
While information related to build jobs is located directly in the
|
||||||
specifications, global settings for the @command{cuirass} process are
|
specifications, global settings for the @command{cuirass} process are
|
||||||
accessible in other @code{cuirass-configuration} fields.
|
accessible in other @code{cuirass-configuration} fields.
|
||||||
|
|
||||||
|
|
|
@ -30,8 +30,7 @@
|
||||||
cuirass-configuration
|
cuirass-configuration
|
||||||
cuirass-configuration?
|
cuirass-configuration?
|
||||||
|
|
||||||
cuirass-service-type
|
cuirass-service-type))
|
||||||
cuirass-service))
|
|
||||||
|
|
||||||
;;;; Commentary:
|
;;;; Commentary:
|
||||||
;;;
|
;;;
|
||||||
|
@ -57,8 +56,8 @@
|
||||||
(default 60))
|
(default 60))
|
||||||
(database cuirass-configuration-database ;string (file-name)
|
(database cuirass-configuration-database ;string (file-name)
|
||||||
(default "/var/run/cuirass/cuirass.db"))
|
(default "/var/run/cuirass/cuirass.db"))
|
||||||
(specifications cuirass-configuration-specifications
|
(specifications cuirass-configuration-specifications)
|
||||||
(default #~'())) ;gexp that evaluates to specification-alist
|
;gexp that evaluates to specification-alist
|
||||||
(use-substitutes? cuirass-configuration-use-substitutes? ;boolean
|
(use-substitutes? cuirass-configuration-use-substitutes? ;boolean
|
||||||
(default #f))
|
(default #f))
|
||||||
(one-shot? cuirass-configuration-one-shot? ;boolean
|
(one-shot? cuirass-configuration-one-shot? ;boolean
|
||||||
|
@ -140,6 +139,3 @@
|
||||||
(service-extension shepherd-root-service-type cuirass-shepherd-service)
|
(service-extension shepherd-root-service-type cuirass-shepherd-service)
|
||||||
(service-extension account-service-type cuirass-account)))))
|
(service-extension account-service-type cuirass-account)))))
|
||||||
|
|
||||||
(define* (cuirass-service #:key (config (cuirass-configuration)))
|
|
||||||
"Return a service that runs cuirass according to CONFIG."
|
|
||||||
(service cuirass-service-type config))
|
|
||||||
|
|
Reference in a new issue