diff options
| author | Bastien Guerry <bzg@altern.org> | 2008-02-18 12:14:24 +0000 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2008-02-18 12:14:24 +0000 |
| commit | f75d05eb65c74e1b17d06e89249d76e4e167724c (patch) | |
| tree | c4747146114f106addd8504b78ac1626e3cf927c | |
| parent | 9f336de0de192e98728b7ad4683767a38ce2150a (diff) | |
| download | emacs-f75d05eb65c74e1b17d06e89249d76e4e167724c.tar.gz | |
* info.el (Info-read-node-name): Removed unused `default' arg.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/info.el | 5 |
2 files changed, 6 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0092c50471f..ac3e768c1a3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2008-02-18 Bastien Guerry <Bastien.Guerry@ens.fr> + + * info.el (Info-read-node-name): Removed unused `default' arg. + 2008-02-18 Thien-Thi Nguyen <ttn@gnuvola.org> * vc-git.el (vc-git-after-dir-status, vc-git-dir-status): New funcs. diff --git a/lisp/info.el b/lisp/info.el index 090e470efec..5bbbd60019e 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -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 () |