guix
/
data-service
mirror of git://git.savannah.gnu.org/guix/data-service.git
2
0
Fork 0
Code Issues Releases Wiki Activity

Decrease builds number to 1 

As I don't think these endpoints can return more than 1 result.
This commit is contained in:
Christopher Baines 2019-03-07 21:51:32 +00:00
parent ccb429c8b9
commit 0380c84a67
No known key found for this signature in database
GPG Key ID: 5E28A33B0B84F577
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
guix-data-service/builds.scm
View File

@ -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)))