From 3affd310980c3a82b47cfdf9cde15ee69b013e04 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Thu, 10 Aug 2023 08:54:29 +0100 Subject: Ensure references doesn't contain the empty string --- guix-build-coordinator/datastore/sqlite.scm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'guix-build-coordinator') diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index 824af59..bc086fb 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -3896,10 +3896,12 @@ WHERE builds.id = :build_id" (output . ,output) (hash . ,hash) (size . ,size) - (references . ,(and store_references - (list->vector - (string-split store_references - #\space))))))) + (references . ,(if (and store_references + (not (string-null? store_references))) + (list->vector + (string-split store_references + #\space)) + #()))))) statement))) (sqlite-reset statement) -- cgit v1.2.3