diff options
| author | Christopher Baines <mail@cbaines.net> | 2021-03-30 09:49:16 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2021-03-30 09:49:16 +0100 |
| commit | de7d3884378c29088bcf2987b702d96f97dd1a82 (patch) | |
| tree | 2d2bbe726c3fc06ef6ecd945988690ce3ebd379a | |
| parent | c8838b55a005dcc9c8a64380428d6230b28c684f (diff) | |
| download | build-coordinator-de7d3884378c29088bcf2987b702d96f97dd1a82.tar build-coordinator-de7d3884378c29088bcf2987b702d96f97dd1a82.tar.gz | |
Fix
| -rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index e598d37..03ef4cc 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -717,7 +717,7 @@ WHERE related_derivations.id != :derivation_id (sqlite-bind-arguments statement - #:derivation (db-find-derivation-id db derivation)) + #:derivation_id (db-find-derivation-id db derivation)) (let ((result (sqlite-map (match-lambda @@ -843,7 +843,7 @@ INNER JOIN related_derivations (sqlite-bind-arguments statement - #:derivation (db-find-derivation-id db derivation)) + #:derivation_id (db-find-derivation-id db derivation)) (let ((result (sqlite-map (match-lambda @@ -3100,7 +3100,7 @@ WHERE output = :output (sqlite-bind-arguments statement - #:derivation start-derivation-name + #:derivation_id (db-find-derivation-id db start-derivation-name) #:output output) (let ((result |