01/14: Remove some time logging

[Christopher Baines]

cbaines pushed a commit to branch master
in repository data-service.

commit e51d2f893231727aca77b0654246ee8631f4c869
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sat Jan 27 18:39:41 2024 +0000

    Remove some time logging
    
    As this is a bit noisy.
---
 guix-data-service/model/derivation.scm | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

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