#'gnus-std-completing-read
"Function to do a completing read."
:group 'gnus-meta
- :type `(radio (function-item
+ :type '(radio (function-item
:doc "Use Emacs' standard `completing-read' function."
gnus-std-completing-read)
- ,@(unless (featurep 'xemacs)
- '((function-item
- :doc "Use iswitchb's completing-read function."
- gnus-icompleting-read)
- (function-item
- :doc "Use ido's completing-read function."
- gnus-ido-completing-read)))
+ (function-item :doc "Use iswitchb's completing-read function."
+ gnus-icompleting-read)
+ (function-item :doc "Use ido's completing-read function."
+ gnus-ido-completing-read)
(function)))
(defcustom gnus-completion-styles
(completing-read prompt collection nil require-match
initial-input history def))
-(defvar iswitchb-mode)
-(defvar iswitchb-temp-buflist)
-(declare-function iswitchb-read-buffer "iswitchb"
- (prompt &optional default require-match start matches-set))
-
(defun gnus-icompleting-read (prompt collection &optional require-match
initial-input history def)
(require 'iswitchb)