diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-04-20 23:53:24 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-04-20 23:53:24 +0100 |
| commit | b28341b13d40dc59d57238b29891cb9aa41cfd4b (patch) | |
| tree | 2c948774c56b61d229f9f56a7237f79f42967e21 /guix-build-coordinator/datastore/sqlite.scm | |
| parent | 2a39a4e5ecb5143c4fcedd7f804da88162cebeb9 (diff) | |
| download | build-coordinator-b28341b13d40dc59d57238b29891cb9aa41cfd4b.tar build-coordinator-b28341b13d40dc59d57238b29891cb9aa41cfd4b.tar.gz | |
Add missing sqlite-step and sqlite-reset
Diffstat (limited to 'guix-build-coordinator/datastore/sqlite.scm')
| -rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index 6408059..872728d 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -4062,7 +4062,9 @@ UPDATE derivations SET fixed_output = :fixed_output WHERE name = :name" #:cache? #t))) (sqlite-bind-arguments statement #:name derivation-name - #:fixed_output (if fixed-output? 1 0)))))) + #:fixed_output (if fixed-output? 1 0)) + (sqlite-step statement) + (sqlite-reset statement))))) (define (insert-derivation) (let ((statement |