aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-05-27 23:58:29 +0100
committerChristopher Baines <mail@cbaines.net>2021-05-27 23:58:29 +0100
commit96b8a18412f7fb3c68c94f7cdc683f7139e2dc29 (patch)
tree4b92a8cfd3eecf7d84e02a52ba54602101d08d43
parent94c634a7878c0a82503f272a497e09bfe465aca3 (diff)
downloadbuild-coordinator-96b8a18412f7fb3c68c94f7cdc683f7139e2dc29.tar
build-coordinator-96b8a18412f7fb3c68c94f7cdc683f7139e2dc29.tar.gz
Fix datastore-find-derivation-for-output
-rw-r--r--guix-build-coordinator/datastore/sqlite.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm
index fcc3588..b3ffdd4 100644
--- a/guix-build-coordinator/datastore/sqlite.scm
+++ b/guix-build-coordinator/datastore/sqlite.scm
@@ -3161,14 +3161,14 @@ INNER JOIN derivations
ON derivations.id = related_derivations.id
INNER JOIN derivation_outputs
ON related_derivations.id = derivation_outputs.derivation_id
-WHERE output = :output
+WHERE derivation_outputs.output_id = :output_id
"
#:cache? #t)))
(sqlite-bind-arguments
statement
#:derivation_id (db-find-derivation-id db start-derivation-name)
- #:output output)
+ #:output_id (db-output->output-id db output))
(let ((result
(match (sqlite-step statement)