aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMathieu Othacehe <othacehe@gnu.org>2020-09-15 09:47:04 +0200
committerMathieu Othacehe <othacehe@gnu.org>2020-09-15 09:47:04 +0200
commit5a947e18414fe82ae4a04aea8fd174ee4d177d52 (patch)
tree824cef784d92c1caaa26aa352f2828a71df994aa
parentcd2d2512e639bc111626def5c55c3471abce2946 (diff)
downloadcuirass-5a947e18414fe82ae4a04aea8fd174ee4d177d52.tar
cuirass-5a947e18414fe82ae4a04aea8fd174ee4d177d52.tar.gz
metrics: Rename 'builds-previous-day to 'builds-per-day.
* src/cuirass/metrics.scm (%metrics): Rename 'builds-previous-day to 'builds-per-day. (db-update-metrics): Adapt accordingly. * src/cuirass/http.scm (url-handler): Ditto.
-rw-r--r--src/cuirass/http.scm2
-rw-r--r--src/cuirass/metrics.scm6
2 files changed, 4 insertions, 4 deletions
diff --git a/src/cuirass/http.scm b/src/cuirass/http.scm
index b302aaf..61b1acc 100644
--- a/src/cuirass/http.scm
+++ b/src/cuirass/http.scm
@@ -611,7 +611,7 @@ Hydra format."
(html-page
"Global metrics"
(let ((builds-per-day
- (db-get-metrics-with-id 'builds-previous-day
+ (db-get-metrics-with-id 'builds-per-day
#:limit 10))
(avg-eval-durations
(list
diff --git a/src/cuirass/metrics.scm b/src/cuirass/metrics.scm
index 4721cd5..3efe688 100644
--- a/src/cuirass/metrics.scm
+++ b/src/cuirass/metrics.scm
@@ -96,9 +96,9 @@ date('now', '-1 day'));")))
(id 'average-eval-duration-per-spec)
(compute-proc db-average-eval-duration-per-spec))
- ;; Builds count over last 24 hours.
+ ;; Builds count per day.
(metric
- (id 'builds-previous-day)
+ (id 'builds-per-day)
(compute-proc db-builds-previous-day)
(field-proc db-previous-day-timestamp))))
@@ -186,7 +186,7 @@ timestamp) VALUES ("
(define specifications
(map (cut assq-ref <> #:name) (db-get-specifications)))
- (db-update-metric 'builds-previous-day)
+ (db-update-metric 'builds-per-day)
;; Update specification related metrics.
(for-each (lambda (spec)