Fix select-build-servers with respect to the lookup-builds field

This commit is contained in:
Christopher Baines 2020-06-06 14:40:36 +01:00
parent 91ba00e813
commit ae6541af1e

View file

@ -35,7 +35,7 @@ ORDER BY id")
(list (string->number id) (list (string->number id)
url url
(string=? lookup-all-derivations "t") (string=? lookup-all-derivations "t")
(string=? lookup-builds)))) (string=? lookup-builds "t"))))
(exec-query conn query))) (exec-query conn query)))
(define (select-build-server conn id) (define (select-build-server conn id)