aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMathieu Othacehe <othacehe@gnu.org>2020-06-15 09:11:17 +0200
committerMathieu Othacehe <othacehe@gnu.org>2020-06-15 09:15:08 +0200
commitef6f9f16fe1ddcf5659848d160b4a8ac3397a044 (patch)
treee735ee07ab45ac154a638c026662f04d44f18970
parent4e05bbb093a17145fcabd48ea1d2c9cd7559084d (diff)
downloadguix-ef6f9f16fe1ddcf5659848d160b4a8ac3397a044.tar.gz
guix-ef6f9f16fe1ddcf5659848d160b4a8ac3397a044.zip
ci: Add job option to "latest-builds".
* guix/ci.scm (latest-builds): Add "job" option.
-rw-r--r--guix/ci.scm8
1 files changed, 6 insertions, 2 deletions
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))))