diff options
author | Christopher Baines <mail@cbaines.net> | 2020-05-24 17:02:53 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2020-05-24 17:02:53 +0100 |
commit | b6754c8a4c1135a803fa72fbf4208d46c301b105 (patch) | |
tree | bf057704a4e0f6a121800ff936bc98ec967f1122 /guix-data-service/web/build-server | |
parent | f11421824dd22d4d5ad49ebc190e654ab62517ff (diff) | |
download | data-service-b6754c8a4c1135a803fa72fbf4208d46c301b105.tar data-service-b6754c8a4c1135a803fa72fbf4208d46c301b105.tar.gz |
Add a lookup_builds field to the build_servers table
This is to allow for build servers where only the substitutes should be
queried, and it shouldn't be assumed that they're running Cuirass.
Diffstat (limited to 'guix-data-service/web/build-server')
-rw-r--r-- | guix-data-service/web/build-server/html.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-data-service/web/build-server/html.scm b/guix-data-service/web/build-server/html.scm index bb15e11..319ab79 100644 --- a/guix-data-service/web/build-server/html.scm +++ b/guix-data-service/web/build-server/html.scm @@ -103,7 +103,7 @@ (h2 "Build servers") ,@(map (match-lambda - ((id url lookup-all-derivations?) + ((id url lookup-all-derivations? lookup-builds?) `(dl (@ (class "dl-horizontal")) (dt "URL") @@ -112,6 +112,10 @@ (dt "Lookup all " (br) "derivations?") (dd ,(if lookup-all-derivations? "Yes" + "No")) + (dt "Lookup " (br) "builds?") + (dd ,(if lookup-builds? + "Yes" "No"))))) build-servers))))))) |