From b6d61ffa7afcde7e6e29538821e20b841541e18a Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Sat, 8 Mar 1997 19:19:51 +0000 Subject: (Info-read-node-name): Caused completing-read to force the input read to match a valid entry --- lisp/info.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/info.el') 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-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)) -- cgit v1.2.1