aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-05-21 20:28:09 +0100
committerChristopher Baines <mail@cbaines.net>2021-05-21 20:29:38 +0100
commita9c69f34396cb5334d0703374a1aeafea8b42745 (patch)
tree1aaace5be4530d496f97b5d2b13808556cb68baa
parent494ca35f938e1c5b1bcb33a989c01ee432ce26b0 (diff)
downloadbuild-coordinator-a9c69f34396cb5334d0703374a1aeafea8b42745.tar
build-coordinator-a9c69f34396cb5334d0703374a1aeafea8b42745.tar.gz
Allow datastore-find-derivation-system to return #f
If the derivation doesn't exist.
-rw-r--r--guix-build-coordinator/datastore/sqlite.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm
index ed76a09..0f5ffd6 100644
--- a/guix-build-coordinator/datastore/sqlite.scm
+++ b/guix-build-coordinator/datastore/sqlite.scm
@@ -3081,6 +3081,7 @@ WHERE name = :name"
(let ((system
(match (sqlite-step statement)
+ (#f #f)
(#(system) system))))
(sqlite-reset statement)