From e51d2f893231727aca77b0654246ee8631f4c869 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sat, 27 Jan 2024 18:39:41 +0000 Subject: Remove some time logging As this is a bit noisy. --- guix-data-service/model/derivation.scm | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) (limited to 'guix-data-service') diff --git a/guix-data-service/model/derivation.scm b/guix-data-service/model/derivation.scm index c516e58..3b35a0a 100644 --- a/guix-data-service/model/derivation.scm +++ b/guix-data-service/model/derivation.scm @@ -1834,11 +1834,7 @@ WHERE derivation_inputs.derivation_id IN (" (hash-set! seen-ids number #t) number)))) - (with-time-logging - (simple-format - #f "querying for batch of ~A related derivation ids" - (length ids-chunk)) - (exec-query conn query))))) + (exec-query conn query)))) (chunk! ids 500)) < =)) @@ -1863,8 +1859,7 @@ INNER JOIN derivation_source_files (map (lambda (row) (list (string->number (first row)) (second row))) - (with-time-logging "finding batch of missing sources" - (exec-query conn query)))) + (exec-query conn query))) (let ((seen-ids (make-hash-table))) (let loop ((next-related-derivation-ids -- cgit v1.2.3