[Emacs-diffs] master 0c450e0: Tweak bug ID prompting in gnus-group--read-bug-ids

[Lars Ingebrigtsen]

branch: master
commit 0c450e09b8eea8839d10c329debb3be37ccd9a34
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    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 050b389..bdc8c38 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.