services: ganeti: Label mcron jobs.

* gnu/services/ganeti.scm (ganeti-watcher-jobs): Label job as "ganeti-watcher".
(ganeti-cleaner-jobs): Labels jobs as "ganeti master cleaner" and "ganeti node
cleaner".
This commit is contained in:
Marius Bakke 2022-12-25 12:02:05 +01:00
parent 860e949896
commit c97de4a989
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA

View file

@ -683,7 +683,8 @@ (define (ganeti-watcher-jobs config)
#~(#$schedule))
((? list?)
#~('#$schedule)))
#$(ganeti-watcher-command config))))))
#$(ganeti-watcher-command config)
"ganeti-watcher")))))
(define ganeti-watcher-service-type
(service-type (name 'ganeti-watcher)
@ -725,7 +726,8 @@ (define ganeti-cleaner-jobs
#~('#$master-schedule)))
(lambda ()
(system* #$(file-append ganeti "/sbin/ganeti-cleaner")
"master")))
"master"))
"ganeti master cleaner")
#~(job #$@(match node-schedule
((? string?)
#~(#$node-schedule))
@ -733,7 +735,8 @@ (define ganeti-cleaner-jobs
#~('#$node-schedule)))
(lambda ()
(system* #$(file-append ganeti "/sbin/ganeti-cleaner")
"node")))))))
"node"))
"ganeti node cleaner")))))
(define ganeti-cleaner-service-type
(service-type (name 'ganeti-cleaner)