diff options
| author | Christopher Baines <mail@cbaines.net> | 2025-02-16 14:54:58 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2025-02-16 14:54:58 +0000 |
| commit | e809421aa762ae478922c60dbd7ab52c4637dd78 (patch) | |
| tree | 4a5a894b7ff16fe561845c216df4137ac58a4324 | |
| parent | c5950d59277aecf067f00394b8eadaad6e2f7878 (diff) | |
| download | build-coordinator-e809421aa762ae478922c60dbd7ab52c4637dd78.tar build-coordinator-e809421aa762ae478922c60dbd7ab52c4637dd78.tar.gz | |
Always call metric-observe-duration in datastore-call-with-transaction
Regardless of the duration.
| -rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index e31e2d0..98d36f7 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -679,13 +679,13 @@ PRAGMA optimize;") (current-error-port) "warning: ~a:\n took ~4f seconds in transaction\n" proc - duration-seconds) + duration-seconds)) - (when duration-metric-name - (metric-observe-duration datastore - duration-metric-name - duration-seconds - #:buckets duration-metric-buckets)))))) + (when duration-metric-name + (metric-observe-duration datastore + duration-metric-name + duration-seconds + #:buckets duration-metric-buckets))))) (define-method (datastore-find-agent (datastore <sqlite-datastore>) |