From ef6f9f16fe1ddcf5659848d160b4a8ac3397a044 Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Mon, 15 Jun 2020 09:11:17 +0200 Subject: ci: Add job option to "latest-builds". * guix/ci.scm (latest-builds): Add "job" option. --- guix/ci.scm | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'guix/ci.scm') diff --git a/guix/ci.scm b/guix/ci.scm index e1016ef566..36f85e1f12 100644 --- a/guix/ci.scm +++ b/guix/ci.scm @@ -109,7 +109,10 @@ (map json->build (vector->list queue)))) (define* (latest-builds url #:optional (limit %query-limit) - #:key evaluation system) + #:key + evaluation + system + job) "Return the latest builds performed by the CI server at URL. If EVALUATION is an integer, restrict to builds of EVALUATION. If SYSTEM is true (a system string such as \"x86_64-linux\"), restrict to builds for SYSTEM." @@ -122,7 +125,8 @@ string such as \"x86_64-linux\"), restrict to builds for SYSTEM." (number->string limit) (option "evaluation" evaluation number->string) - (option "system" system))))) + (option "system" system) + (option "job" job))))) ;; Note: Hydra does not provide a "derivation" field for entries in ;; 'latestbuilds', but Cuirass does. (map json->build (vector->list latest)))) -- cgit v1.2.3