diff options
author | Karl Heuer <kwzh@gnu.org> | 1997-03-08 19:19:51 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1997-03-08 19:19:51 +0000 |
commit | b6d61ffa7afcde7e6e29538821e20b841541e18a (patch) | |
tree | 7a6a1204dc873ca0244dfebc9eb36e5a9c33cbbe /lisp/info.el | |
parent | fd543be59d1056c9ae4c887ef6a1450f93a1b28f (diff) | |
download | emacs-b6d61ffa7afcde7e6e29538821e20b841541e18a.tar.gz |
(Info-read-node-name): Caused completing-read to force
the input read to match a valid entry
Diffstat (limited to 'lisp/info.el')
-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 @@ ;;; info.el --- info package for Emacs. -;; Copyright (C) 1985, 1986, 1992, 1993, 1994 Free Software Foundation, Inc. +;; Copyright (C) 1985-1986, 1992-1997 Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: help @@ -695,7 +695,7 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself." (defun Info-read-node-name (prompt &optional default) (let* ((completion-ignore-case t) (completion-table (Info-build-node-completions)) - (nodename (completing-read prompt 'Info-read-node-name-1))) + (nodename (completing-read prompt 'Info-read-node-name-1 nil t))) (if (equal nodename "") (or default (Info-read-node-name prompt)) |