diff options
Diffstat (limited to 'guix-data-service')
| -rw-r--r-- | guix-data-service/model/derivation.scm | 9 |
1 files 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 |