Have delete-duplicates/sort! take a equality procedure

And change the default, as eq? doesn't always work.
2024-01-18 14:38:33 +00:00 · 2024-01-18 14:38:33 +00:00 · 15b6dad5a5
commit 15b6dad5a5
parent 45d9b1ad7c
3 changed files with 5 additions and 4 deletions
--- a/guix-data-service/model/derivation.scm
+++ b/guix-data-service/model/derivation.scm
@ -1840,7 +1840,8 @@ WHERE derivation_inputs.derivation_id IN ("
                  (length ids-chunk))
               (exec-query conn query)))))
        (chunk! ids 500))
-       <))
+       <
+       =))

    (define (derivation-ids->missing-sources ids)
      (define query