diff options
| author | Karl Heuer | 1997-03-08 19:19:51 +0000 |
|---|---|---|
| committer | Karl Heuer | 1997-03-08 19:19:51 +0000 |
| commit | b6d61ffa7afcde7e6e29538821e20b841541e18a (patch) | |
| tree | 7a6a1204dc873ca0244dfebc9eb36e5a9c33cbbe /lisp | |
| parent | fd543be59d1056c9ae4c887ef6a1450f93a1b28f (diff) | |
| download | emacs-b6d61ffa7afcde7e6e29538821e20b841541e18a.tar.gz emacs-b6d61ffa7afcde7e6e29538821e20b841541e18a.zip | |
(Info-read-node-name): Caused completing-read to force
the input read to match a valid entry
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/info.el b/lisp/info.el index bf25a8522d0..be26cd4fa33 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; info.el --- info package for Emacs. | 1 | ;;; info.el --- info package for Emacs. |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1985, 1986, 1992, 1993, 1994 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1985-1986, 1992-1997 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Maintainer: FSF | 5 | ;; Maintainer: FSF |
| 6 | ;; Keywords: help | 6 | ;; Keywords: help |
| @@ -695,7 +695,7 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself." | |||
| 695 | (defun Info-read-node-name (prompt &optional default) | 695 | (defun Info-read-node-name (prompt &optional default) |
| 696 | (let* ((completion-ignore-case t) | 696 | (let* ((completion-ignore-case t) |
| 697 | (completion-table (Info-build-node-completions)) | 697 | (completion-table (Info-build-node-completions)) |
| 698 | (nodename (completing-read prompt 'Info-read-node-name-1))) | 698 | (nodename (completing-read prompt 'Info-read-node-name-1 nil t))) |
| 699 | (if (equal nodename "") | 699 | (if (equal nodename "") |
| 700 | (or default | 700 | (or default |
| 701 | (Info-read-node-name prompt)) | 701 | (Info-read-node-name prompt)) |