diff options
| author | Lars Ingebrigtsen | 2019-07-14 18:27:50 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-07-14 18:27:50 +0200 |
| commit | 0c450e09b8eea8839d10c329debb3be37ccd9a34 (patch) | |
| tree | 7861c480a03e97f8f38190e7d143c9e9fde478af | |
| parent | a7aae1473c1aed7758b550a23cda61ee17668e23 (diff) | |
| download | emacs-0c450e09b8eea8839d10c329debb3be37ccd9a34.tar.gz emacs-0c450e09b8eea8839d10c329debb3be37ccd9a34.zip | |
Tweak bug ID prompting in gnus-group--read-bug-ids
* lisp/gnus/gnus-group.el (gnus-group--read-bug-ids): Default to
current bug id on RET.
| -rw-r--r-- | lisp/gnus/gnus-group.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index 050b3898802..bdc8c38b1bb 100644 --- a/lisp/gnus/gnus-group.el +++ b/lisp/gnus/gnus-group.el | |||
| @@ -2446,7 +2446,10 @@ the bug number, and browsing the URL must return mbox output." | |||
| 2446 | ;; Pass DEF as the value of COLLECTION instead of DEF because: | 2446 | ;; Pass DEF as the value of COLLECTION instead of DEF because: |
| 2447 | ;; a) null input should not cause DEF to be returned and | 2447 | ;; a) null input should not cause DEF to be returned and |
| 2448 | ;; b) TAB and M-n still work this way. | 2448 | ;; b) TAB and M-n still work this way. |
| 2449 | (completing-read-multiple "Bug IDs: " (and def (list (format "%s" def)))))) | 2449 | (or (completing-read-multiple |
| 2450 | (format "Bug IDs%s: " (if def (format " (default %s)" def) "")) | ||
| 2451 | (and def (list (format "%s" def)))) | ||
| 2452 | def))) | ||
| 2450 | 2453 | ||
| 2451 | (defun gnus-read-ephemeral-bug-group (ids mbox-url &optional window-conf) | 2454 | (defun gnus-read-ephemeral-bug-group (ids mbox-url &optional window-conf) |
| 2452 | "Browse bug reports with IDS in an ephemeral group. | 2455 | "Browse bug reports with IDS in an ephemeral group. |