Commit 82fb111c authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

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

parent 5a79736d
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment