diff options
| author | Alex Kost <alezost@gmail.com> | 2018-08-22 11:08:43 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2018-08-26 00:06:26 +0300 |
| commit | 64090127f752b3d32d313adb561688a6951dc563 (patch) | |
| tree | 275da133c843128dd2240b09fcd7545be42378f5 /build-farm-jobset.el | |
| parent | Read project/jobset according to farm type (Hydra or Cuirass) (diff) | |
| download | emacs-build-farm-64090127f752b3d32d313adb561688a6951dc563.tar.gz | |
jobset: Add "Builds" button to Cuirass Jobset Info
* build-farm-jobset.el (build-farm-cuirass-jobset-info-insert-builds):
New procedure.
(build-farm-cuirass-jobset-info-format): Add it.
Diffstat (limited to 'build-farm-jobset.el')
| -rw-r--r-- | build-farm-jobset.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/build-farm-jobset.el b/build-farm-jobset.el index 5fdf281..ac4ac89 100644 --- a/build-farm-jobset.el +++ b/build-farm-jobset.el @@ -219,6 +219,7 @@ The BUTTON file name is relative to guix source tree." nil build-farm-jobset-info-insert-url nil + build-farm-cuirass-jobset-info-insert-builds (load-path-inputs format (format)) (package-path-inputs format (format)) nil @@ -244,6 +245,13 @@ The BUTTON file name is relative to guix source tree." (no-compile? format (format))) :reduced? t) +(defun build-farm-cuirass-jobset-info-insert-builds (entry) + "Insert 'Builds' button for the jobset ENTRY." + (let ((jobset (bui-entry-non-void-value entry 'name))) + (build-farm-build-info-insert-builds-button + :jobset jobset)) + (bui-newline)) + (defun build-farm-cuirass-jobset-info-insert-file (file-name) "Insert FILE-NAME of a jobset's procedure at point." (bui-insert-non-nil file-name |