Stop inserting missing source file nars

This was more an issue several years ago, so this code is not really needed
now.

guix-data-service/model/derivation.scm

@@ -1806,11 +1806,7 @@ WHERE " criteria ";"))
           (exec-query conn (select-existing-derivations chunk))))
        (chunk! missing-file-names 1000)))))
 
-(define (derivation-file-names->derivation-ids conn derivation-file-names)
-  (define derivations-count
-    (vector-length derivation-file-names))
-
-  (define (insert-source-files-missing-nars derivation-ids)
+(define (insert-source-files-missing-nars conn derivation-ids)
   (define (derivation-ids->next-related-derivation-ids! ids seen-ids)
     (delete-duplicates/sort!
      (append-map!
@@ -1892,6 +1888,10 @@ INNER JOIN derivation_source_files
           next-related-derivation-ids
           seen-ids))))))
 
+(define (derivation-file-names->derivation-ids conn derivation-file-names)
+  (define derivations-count
+    (vector-length derivation-file-names))
+
   (if (= 0 derivations-count)
       #()
       (let* ((derivation-ids-hash-table (make-hash-table
@@ -1951,17 +1951,6 @@ INNER JOIN derivation_source_files
                         #f))
                   derivation-file-names)))
 
-            (with-time-logging "insert-source-files-missing-nars"
-              (insert-source-files-missing-nars
-               ;; TODO Avoid this conversion
-               (vector-fold
-                (lambda (_ result x)
-                  (if x
-                      (cons x result)
-                      result))
-                '()
-                all-ids)))
-
             all-ids)))))
 
 (define (update-derivation-inputs-statistics conn)