mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-30 00:51:50 -08:00
* info.el (Info-read-node-name): Removed unused `default' arg.
This commit is contained in:
parent
9f336de0de
commit
f75d05eb65
2 changed files with 6 additions and 3 deletions
|
|
@ -1550,13 +1550,12 @@ PATH-AND-SUFFIXES is a pair of lists, (DIRECTORIES . SUFFIXES)."
|
|||
1
|
||||
0)))
|
||||
|
||||
(defun Info-read-node-name (prompt &optional default)
|
||||
(defun Info-read-node-name (prompt)
|
||||
(let* ((completion-ignore-case t)
|
||||
(Info-read-node-completion-table (Info-build-node-completions))
|
||||
(nodename (completing-read prompt 'Info-read-node-name-1 nil t)))
|
||||
(if (equal nodename "")
|
||||
(or default
|
||||
(Info-read-node-name prompt))
|
||||
(Info-read-node-name prompt)
|
||||
nodename)))
|
||||
|
||||
(defun Info-build-node-completions ()
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue