diff options
| -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>) |