diff options
| -rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index 13d9ec7..c598b43 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -1962,7 +1962,7 @@ WHERE derivation_inputs.derivation_name = :derivation_name" (derivation-file-name derivation)) (define (insert-derivation) - (let ((derivation-details (db-find-derivation db derivation)) + (let ((derivation-details (db-find-derivation db derivation-name)) (fixed-output? (fixed-output-derivation? derivation))) (if derivation-details (begin @@ -1987,7 +1987,7 @@ INSERT OR IGNORE INTO derivations (name, system, fixed_output) statement #:name derivation-name #:system (derivation-system derivation) - #:fixed_output fixed-output?) + #:fixed_output (if fixed-output? 1 0)) (sqlite-step statement) (sqlite-reset statement) |