From 671c5ed1596fd69a832a126c2efb5eaea17cf10f Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Fri, 21 May 2021 20:28:30 +0100 Subject: Return #f from datastore-find-derivation-outputs if none are found As this is clearer than '(). --- guix-build-coordinator/datastore/sqlite.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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 ) -- cgit v1.2.3