From 0380c84a676647b8879315b50be52a04362d616a Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Thu, 7 Mar 2019 21:51:32 +0000 Subject: [PATCH] Decrease builds number to 1 As I don't think these endpoints can return more than 1 result. --- guix-data-service/builds.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/guix-data-service/builds.scm b/guix-data-service/builds.scm index 26f24fc..471a830 100644 --- a/guix-data-service/builds.scm +++ b/guix-data-service/builds.scm @@ -99,7 +99,7 @@ (define (fetch-latest-builds-for-derivation base-url derivation-file-name) (define url (string-append base-url - "api/latestbuilds?nr=10" + "api/latestbuilds?nr=1" "&derivation=" derivation-file-name)) (let-values (((response body) (http-request url))) @@ -115,7 +115,7 @@ (define (fetch-queued-builds-for-derivation base-url derivation-file-name) (define url (string-append base-url - "api/queue?nr=10" + "api/queue?nr=1" "&derivation=" derivation-file-name)) (let-values (((response body) (http-request url)))