guix/data-service
2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/data-service.git synced 2023-12-14 03:23:03 +01:00
Code Issues Releases Wiki Activity

Query for builds for channel instance derivations

Browse source
This commit is contained in:
Christopher Baines 2020-02-12 08:38:05 +00:00
parent 5cf186e5b1
commit 1c34e07e84
1 changed files with 17 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
guix-data-service/builds.scm
View file

@ -475,6 +475,23 @@ WHERE NOT EXISTS (
derivations_by_output_details_set.derivation_id
INNER JOIN guix_revisions
ON guix_revisions.id = guix_revision_system_test_derivations.guix_revision_id
"
(if (null? revision-commits)
""
(string-append
"
WHERE guix_revisions.commit IN ("
(string-join (map quote-string revision-commits) ",")
")"))
"
UNION ALL
SELECT derivations_by_output_details_set.derivation_output_details_set_id
FROM channel_instances
INNER JOIN derivations_by_output_details_set
ON channel_instances.derivation_id =
derivations_by_output_details_set.derivation_id
INNER JOIN guix_revisions
ON guix_revisions.id = channel_instances.guix_revision_id
"
(if (null? revision-commits)
""