aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-05-21 20:28:30 +0100
committerChristopher Baines <mail@cbaines.net>2021-05-21 20:29:38 +0100
commit671c5ed1596fd69a832a126c2efb5eaea17cf10f (patch)
treed6279d627aed34c220bbcccadd671aa0565fb1bc
parenta9c69f34396cb5334d0703374a1aeafea8b42745 (diff)
downloadbuild-coordinator-671c5ed1596fd69a832a126c2efb5eaea17cf10f.tar
build-coordinator-671c5ed1596fd69a832a126c2efb5eaea17cf10f.tar.gz
Return #f from datastore-find-derivation-outputs if none are found
As this is clearer than '().
-rw-r--r--guix-build-coordinator/datastore/sqlite.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm
index 0f5ffd6..fd75d2e 100644
--- a/guix-build-coordinator/datastore/sqlite.scm
+++ b/guix-build-coordinator/datastore/sqlite.scm
@@ -2984,7 +2984,9 @@ WHERE derivation_id = :derivation_id"
statement)))
(sqlite-reset statement)
- result)))))
+ (if (null? result)
+ #f
+ result))))))
(define-method (datastore-list-unbuilt-derivation-outputs
(datastore <sqlite-datastore>)