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.

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 050b389880205f41bdfa75054a2b651dea07799a..bdc8c38b1bbbaec20869ec73157ea51d1eb3d5e9 100644 (file)
--- 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.