From 0c450e09b8eea8839d10c329debb3be37ccd9a34 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 14 Jul 2019 18:27:50 +0200 Subject: [PATCH] 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. --- lisp/gnus/gnus-group.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) 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." ;; Pass DEF as the value of COLLECTION instead of DEF because: ;; a) null input should not cause DEF to be returned and ;; b) TAB and M-n still work this way. - (completing-read-multiple "Bug IDs: " (and def (list (format "%s" def)))))) + (or (completing-read-multiple + (format "Bug IDs%s: " (if def (format " (default %s)" def) "")) + (and def (list (format "%s" def)))) + def))) (defun gnus-read-ephemeral-bug-group (ids mbox-url &optional window-conf) "Browse bug reports with IDS in an ephemeral group. -- 2.39.2