cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Set an order for select-outputs-without-known-nar-entries

Browse source 
Pulling out the recent entries first.
This commit is contained in:
Christopher Baines 2020-03-13 23:34:56 +00:00
parent baeae56de4
commit 6e81acf0a5
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
guix-data-service/model/nar.scm
View file

@ -305,7 +305,7 @@ ORDER BY COUNT(*) DESC")
(define query (define query
(string-append (string-append
" "
SELECT DISTINCT derivation_output_details.path SELECT DISTINCT derivation_output_details.path, derivation_output_details.id
FROM derivations FROM derivations
INNER JOIN derivation_outputs INNER JOIN derivation_outputs
ON derivations.id = derivation_outputs.derivation_id ON derivations.id = derivation_outputs.derivation_id
@ -346,6 +346,7 @@ WHERE derivation_output_details.path NOT IN (
") ")
)")) )"))
" "
ORDER BY derivation_output_details.id DESC
LIMIT 10000")) LIMIT 10000"))
(map car (exec-query conn query (list (number->string build-server-id))))) (map car (exec-query conn query (list (number->string build-server-id)))))