From 7de0ed3febeb7c71233d1cfa5cda944a390f7966 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Wed, 6 Dec 2023 17:59:53 +0000
Subject: Drop the write duration logging threshold

---
 guix-build-coordinator/datastore/sqlite.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'guix-build-coordinator/datastore')

diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm
index cc15b38..d87a90f 100644
--- a/guix-build-coordinator/datastore/sqlite.scm
+++ b/guix-build-coordinator/datastore/sqlite.scm
@@ -197,7 +197,7 @@ CREATE TABLE IF NOT EXISTS mem.build_allocation_plan (
                             seconds-delayed))))
       #:duration-logger
       (lambda (duration proc)
-        (when (> duration 30)
+        (when (> duration 10)
           (format
            (current-error-port)
            "warning: database write took ~1,2f seconds (~a)~%"
-- 
cgit v1.2.3