amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: cuirass: Add ‘log-expiry’ option for ‘remote-server’.

Browse source 
* gnu/services/cuirass.scm (<cuirass-remote-server-configuration>)[log-expiry]:
New field.
(cuirass-shepherd-service): Honor it.
* doc/guix.texi (Continuous Integration): Document it.
This commit is contained in:
Ludovic Courtès 2023-10-12 22:12:51 +02:00
parent f0c929f1e6
commit 5a3fb30653
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 10 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

7
gnu/services/cuirass.scm
View file

@ -73,6 +73,8 @@
(default "/var/log/cuirass-remote-server.log"))
(cache cuirass-remote-server-configuration-cache ;string
(default "/var/cache/cuirass/remote/"))
(log-expiry cuirass-remote-server-configuration-log-expiry
(default (* 6 30 24 3600))) ;6 months
(publish? cuirass-remote-server-configuration-publish? ;boolean
(default #t))
(trigger-url cuirass-remote-server-trigger-url ;string
@ -194,7 +196,7 @@
(stop #~(make-kill-destructor)))
,@(if remote-server
(match-record remote-server <cuirass-remote-server-configuration>
(backend-port publish-port log-file cache publish?
(backend-port publish-port log-file log-expiry cache publish?
trigger-url public-key private-key)
(list
(shepherd-service
@ -207,6 +209,9 @@
(string-append "--database=" #$database)
(string-append "--cache=" #$cache)
(string-append "--user=" #$user)
(string-append "--log-expiry="
#$(number->string log-expiry)
"s")
#$@(if backend-port
(list (string-append
"--backend-port="