1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

(info-complete-symbol): If MODE is nil, use the default value.

This commit is contained in:
Richard M. Stallman 1997-06-19 02:44:46 +00:00
parent 5a79736d82
commit 82fb111c22

View file

@ -465,12 +465,13 @@ Return nil if there is nothing appropriate."
;;;###autoload
(defun info-complete-symbol (&optional mode)
"Perform completion on symbol preceding point."
(interactive
(list (if (info-lookup->mode-value
'symbol (or info-lookup-mode major-mode))
(or info-lookup-mode major-mode)
(info-lookup-change-mode 'symbol))))
(info-complete 'symbol mode))
(interactive)
(info-complete 'symbol
(or mode
(if (info-lookup->mode-value
'symbol (or info-lookup-mode major-mode))
(or info-lookup-mode major-mode)
(info-lookup-change-mode 'symbol)))))
;;;###autoload
(defun info-complete-file (&optional mode)