nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

services: cuirass: Add fallback parameter. 

* gnu/services/cuirass.scm (<cuirass-configuration>)[fallback?]: New field.
(cuirass-shepherd-service): Take it into account.
* doc/guix.texi (Continuous Integration): Document it.
This commit is contained in:
Mathieu Othacehe 2017-07-13 11:34:26 +02:00
parent 3c14378381
commit c800fd564b
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
doc/guix.texi
View File

@ -14773,6 +14773,10 @@ from source.
@item @code{one-shot?} (default: @code{#f}) @item @code{one-shot?} (default: @code{#f})
Only evaluate specifications and build derivations once. Only evaluate specifications and build derivations once.
@item @code{fallback?} (default: @code{#f})
When substituting a pre-built binary fails, fall back to building
packages locally.
@item @code{load-path} (default: @code{'()}) @item @code{load-path} (default: @code{'()})
This allows users to define their own packages and make them visible to This allows users to define their own packages and make them visible to
cuirass as in @command{guix build} command. cuirass as in @command{guix build} command.

4
gnu/services/cuirass.scm
View File

@ -66,6 +66,8 @@
(default #f)) (default #f))
(one-shot? cuirass-configuration-one-shot? ;boolean (one-shot? cuirass-configuration-one-shot? ;boolean
(default #f)) (default #f))
(fallback? cuirass-configuration-fallback? ;boolean
(default #f))
(load-path cuirass-configuration-load-path (load-path cuirass-configuration-load-path
(default '()))) (default '())))
@ -84,6 +86,7 @@
(specs (cuirass-configuration-specifications config)) (specs (cuirass-configuration-specifications config))
(use-substitutes? (cuirass-configuration-use-substitutes? config)) (use-substitutes? (cuirass-configuration-use-substitutes? config))
(one-shot? (cuirass-configuration-one-shot? config)) (one-shot? (cuirass-configuration-one-shot? config))
(fallback? (cuirass-configuration-fallback? config))
(load-path (cuirass-configuration-load-path config))) (load-path (cuirass-configuration-load-path config)))
(list (shepherd-service (list (shepherd-service
(documentation "Run Cuirass.") (documentation "Run Cuirass.")
@ -99,6 +102,7 @@
"--interval" #$(number->string interval) "--interval" #$(number->string interval)
#$@(if use-substitutes? '("--use-substitutes") '()) #$@(if use-substitutes? '("--use-substitutes") '())
#$@(if one-shot? '("--one-shot") '()) #$@(if one-shot? '("--one-shot") '())
#$@(if fallback? '("--fallback") '())
#$@(if (null? load-path) '() #$@(if (null? load-path) '()
`("--load-path" ,(string-join load-path ":")))) `("--load-path" ,(string-join load-path ":"))))
#:user #$user #:user #$user