From 423a096ad7a82e7f157ca55dfd6e38cb77e8c486 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Thu, 5 Dec 2019 16:14:37 +0100 Subject: Fix the match statement in select-build-by-build-server-and… MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- guix-data-service/model/build.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/guix-data-service/model/build.scm b/guix-data-service/model/build.scm index 79da81b..ee83c30 100644 --- a/guix-data-service/model/build.scm +++ b/guix-data-service/model/build.scm @@ -105,7 +105,8 @@ WHERE build_server_id = $1 AND derivation_file_name = $2") query (list (number->string build-server-id) derivation-file-name)) - ((id) (string->number id)) + ((id build_server_id derivation_file_name) + (string->number id)) (_ #f))) -- cgit v1.2.3