diff options
| author | Alex Kost <alezost@gmail.com> | 2018-07-22 23:40:21 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2018-07-27 12:14:24 +0300 |
| commit | f9b4828b0a04286949ac0b61af3f278a246000e6 (patch) | |
| tree | 3ff976b562fed803e4c5c5be41d2cc13b4cf202e /build-farm-build.el | |
| parent | Colorize names of jobsets in Jobset List buffer (diff) | |
| download | emacs-build-farm-f9b4828b0a04286949ac0b61af3f278a246000e6.tar.gz | |
Add 'build-farm-build' command
* build-farm.el (build-farm-get-entries-1): Wrap a single ID entry into
a list.
* build-farm-build.el (build-farm-build-search-types): Add 'id' search type.
(build-farm-build): New command.
Diffstat (limited to 'build-farm-build.el')
| -rw-r--r-- | build-farm-build.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/build-farm-build.el b/build-farm-build.el index 83345e8..56e8066 100644 --- a/build-farm-build.el +++ b/build-farm-build.el @@ -29,7 +29,8 @@ (require 'build-farm-url) (build-farm-define-entry-type build - :search-types '((latest . build-farm-build-latest-api-url) + :search-types '((id . build-farm-build-url) + (latest . build-farm-build-latest-api-url) (queue . build-farm-build-queue-api-url)) :filters '(build-farm-build-filter-status) :filter-names '((nixname . name) @@ -406,6 +407,12 @@ NUMBER. With prefix argument, prompt for it." build-farm-number-of-builds))) (build-farm-get-display build-farm-url 'build 'queue number)) +;;;###autoload +(defun build-farm-build (id) + "Find build by its ID and display it." + (interactive "nBuild ID: ") + (build-farm-get-display build-farm-url 'build 'id id)) + (provide 'build-farm-build) ;;; build-farm-build.el ends here |