diff options
| author | Alex Kost <alezost@gmail.com> | 2018-07-17 22:42:35 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2018-07-27 12:14:24 +0300 |
| commit | 2ab552a228804ce8983947e40f31225b3f32fbb3 (patch) | |
| tree | be2015537a0663001a76081f1c1c0e3d9d372d22 /build-farm.el | |
| parent | Use key arguments for 'build-farm-jobset-url' (diff) | |
| download | emacs-build-farm-2ab552a228804ce8983947e40f31225b3f32fbb3.tar.gz | |
Add and use 'build-farm-get-display'
Instead of 'build-farm-ENTRY-TYPE-get-display' functions.
* build-farm.el (build-farm-get-display): New procedure.
* build-farm-build.el (build-farm-build-get-display): Remove.
(build-farm-build-info-insert-builds-button)
(build-farm-latest-builds, build-farm-queued-builds): Adjust accordingly.
* build-farm-jobset.el (build-farm-jobset-get-display): Remove.
(build-farm-jobsets): Adjust accordingly.
* build-farm-project.el (build-farm-project-get-display): Remove.
(build-farm-projects): Adjust accordingly.
Diffstat (limited to 'build-farm.el')
| -rw-r--r-- | build-farm.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/build-farm.el b/build-farm.el index 6cde870..ecaec17 100644 --- a/build-farm.el +++ b/build-farm.el @@ -108,6 +108,14 @@ See `build-farm-search-url' for the meaning of SEARCH-TYPE and ARGS." (build-farm-filters entry-type)))) entries))) +(defun build-farm-get-display (entry-type search-type &rest args) + "Search for ENTRY-TYPE entries and show results. +ENTRY-TYPE should be `build', `jobset', etc. +See `build-farm-search-url' for the meaning of SEARCH-TYPE and ARGS." + (apply #'bui-list-get-display-entries + (build-farm-symbol entry-type) + search-type args)) + (defun build-farm-message (entries search-type &rest _) "Display a message after showing ENTRIES of SEARCH-TYPE." ;; XXX Add more messages maybe. |