cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve select-build-servers to convert strings to appropriate types

Browse source
This commit is contained in:
Christopher Baines 2019-11-23 11:23:16 +00:00
parent 53652db9ca
commit 6fad559b32
2 changed files with 16 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -18,7 +18,7 @@
(for-each
(match-lambda
((id url lookup-all-derivations?)
(when (string=? lookup-all-derivations? "t")
(when lookup-all-derivations?
(query-build-server conn id url))))
build-servers))))
@ -166,7 +166,7 @@
") "
"LIMIT 1000"))
(exec-query conn query (list build-server-id)))
(exec-query conn query (list (number->string build-server-id))))
(define (select-derivations-with-no-known-build conn)
(define query