diff options
| -rw-r--r-- | src/cuirass/http.scm | 3 | ||||
| -rw-r--r-- | src/cuirass/metrics.scm | 2 |
2 files changed, 2 insertions, 3 deletions
diff --git a/src/cuirass/http.scm b/src/cuirass/http.scm index cc88f04..b302aaf 100644 --- a/src/cuirass/http.scm +++ b/src/cuirass/http.scm @@ -612,8 +612,7 @@ Hydra format." "Global metrics" (let ((builds-per-day (db-get-metrics-with-id 'builds-previous-day - #:limit 10 - #:order "field")) + #:limit 10)) (avg-eval-durations (list (db-get-metrics-with-id diff --git a/src/cuirass/metrics.scm b/src/cuirass/metrics.scm index c5880e3..4721cd5 100644 --- a/src/cuirass/metrics.scm +++ b/src/cuirass/metrics.scm @@ -133,7 +133,7 @@ WHERE type = " type " AND field = " field ";"))) (define* (db-get-metrics-with-id id #:key limit - (order "timestamp")) + (order "rowid DESC")) "Return the metrics with the given ID. If LIMIT is set, the resulting list if restricted to LIMIT records." (let* ((metric (find-metric id)) |