diff options
| author | Alex Kost <alezost@gmail.com> | 2018-08-26 00:04:11 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2018-08-26 00:06:26 +0300 |
| commit | 4bf085b6899cd8b6083fb47696ffa3278b288960 (patch) | |
| tree | da12842993a035df92574feaf1493e5a64265e92 | |
| parent | Add interface for Cuirass evaluations (diff) | |
| download | emacs-build-farm-4bf085b6899cd8b6083fb47696ffa3278b288960.tar.gz | |
popup: Handle null number of builds
* build-farm-popup.el (build-farm-popup-latest-builds)
(build-farm-popup-queued-builds): Prompt for the number of builds if it
is not set.
| -rw-r--r-- | build-farm-popup.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/build-farm-popup.el b/build-farm-popup.el index b5b5b5b..e037cba 100644 --- a/build-farm-popup.el +++ b/build-farm-popup.el @@ -128,13 +128,16 @@ See `completing-read' for PROMPT and INITIAL-INPUT." ARGS are read from the current popup buffer." (interactive (build-farm-popup-build-args)) (apply #'build-farm-latest-builds - build-farm-number-of-builds + (or build-farm-number-of-builds + (build-farm-build-read-number)) (build-farm-popup-parse-build-args args))) (defun build-farm-popup-queued-builds () "Display `build-farm-number-of-builds' of queued builds." (interactive) - (build-farm-queued-builds build-farm-number-of-builds)) + (build-farm-queued-builds + (or build-farm-number-of-builds + (build-farm-build-read-number)))) ;;; Evaluations |