From b79c7e83be03be8f420e9f78ac3f8d9000c17f77 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sat, 10 Aug 2024 18:30:06 +0100 Subject: [PATCH] Reduce chunk size To try and respond quicker when the WAL is growing. --- guix-data-service/jobs/load-new-guix-revision.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 5e28ba0..f9eb3f6 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -1889,7 +1889,7 @@ SELECT 1 FROM derivation_source_file_nars WHERE derivation_source_file_id = $1" (inferior-eval '(vector-length gds-inferior-packages) inferior))))) - (define chunk-size 5000) + (define chunk-size 3000) (define (check-wal-size) (let loop ((wal-bytes