From 7f4a317cea571bd9ba9a171a2669300ca8d2ca38 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Fri, 27 May 2022 14:14:33 +0100 Subject: Remove left over peek call from queue builds script --- scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'scripts') diff --git a/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in b/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in index e7fbdb3..da985dc 100644 --- a/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in +++ b/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in @@ -138,14 +138,14 @@ (let ((data (guix-data-service-request guix-data-service (string-append "/revision/" commit "/package-derivations.json") - (peek `((system . ,system) + `((system . ,system) (target . ,target) (field . "(no-additional-fields)") ,@(if guix-data-service-build-server-id `((no_build_from_build_server . ,guix-data-service-build-server-id)) '()) - (all_results . "on")))))) + (all_results . "on"))))) (map (lambda (entry) (assoc-ref entry "derivation")) (vector->list -- cgit v1.2.3