diff options
Diffstat (limited to 'bin')
| -rw-r--r-- | bin/cuirass.in | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/bin/cuirass.in b/bin/cuirass.in index c4bcfaa..9c856fc 100644 --- a/bin/cuirass.in +++ b/bin/cuirass.in @@ -29,6 +29,7 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@" (use-modules (cuirass) (cuirass ui) (cuirass logging) + (cuirass metrics) (cuirass utils) (guix ui) ((guix build utils) #:select (mkdir-p)) @@ -183,11 +184,20 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@" (lambda () (while #t (process-specs (db-get-specifications)) - (log-message "next evaluation in ~a seconds" interval) + (log-message + "next evaluation in ~a seconds" interval) (sleep interval))))) (spawn-fiber (essential-task + 'metrics exit-channel + (lambda () + (while #t + (db-update-metrics) + (sleep 3600))))) + + (spawn-fiber + (essential-task 'monitor exit-channel (lambda () (while #t |