Function: gnus-group--read-bug-ids

gnus-group--read-bug-ids is a byte-compiled function defined in gnus-group.el.gz.

Signature

(gnus-group--read-bug-ids)

Documentation

Return a list of bug IDs read in the minibuffer.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-group.el.gz
(defun gnus-group--read-bug-ids ()
  "Return a list of bug IDs read in the minibuffer."
  (require 'bug-reference)
  (let ((def (cond ((thing-at-point-looking-at bug-reference-bug-regexp 500)
                    (match-string 2))
                   ((and (number-at-point)
                         (abs (number-at-point)))))))
    ;; 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.
    (or (completing-read-multiple (format-prompt "Bug IDs" def)
				  (and def (list (format "%s" def))))
	def)))