Mercurial > emacs
changeset 12892:8b902b24d749
(Info-find-emacs-command-nodes): Fix previous change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 19 Aug 1995 16:54:27 +0000 |
| parents | e41d6c7b04ca |
| children | 3ae9326907aa |
| files | lisp/info.el |
| diffstat | 1 files changed, 8 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/info.el Sat Aug 19 06:35:38 1995 +0000 +++ b/lisp/info.el Sat Aug 19 16:54:27 1995 +0000 @@ -1621,7 +1621,9 @@ (defun Info-find-emacs-command-nodes (command) "Return a list of locations documenting COMMAND. -The variable `Info-file-alist' tells what Info manual to search. +The `info-file' property of COMMAND says which Info manual to search. +If COMMAND has no property, the variable `Info-file-list-for-emacs' +defines heuristics for which Info manual to try. The locations are of the format used in Info-history, i.e. \(FILENAME NODENAME BUFFERPOS\)." (let ((where '()) @@ -1640,7 +1642,7 @@ (car elt) elt)) (file (if (consp elt) (cdr elt) elt)) - (regexp (concat "^" (regexp-quote name) + (regexp (concat "\\`" (regexp-quote name) "\\(\\'\\|-\\)"))) (if (string-match regexp (symbol-name command)) (setq info-file file file-list nil)) @@ -1668,7 +1670,8 @@ (defun Info-goto-emacs-command-node (command) "Go to the Info node in the Emacs manual for command COMMAND. The command is found by looking up in Emacs manual's Command Index -or in another manual found via `Info-file-list-for-emacs'." +or in another manual found via COMMAND's `info-file' property or +the variable `Info-file-list-for-emacs'." (interactive "CFind documentation for command: ") (or (commandp command) (signal 'wrong-type-argument (list 'commandp command))) @@ -1699,7 +1702,8 @@ "Go to the Info node in the Emacs manual the command bound to KEY, a string. Interactively, if the binding is execute-extended-command, a command is read. The command is found by looking up in Emacs manual's Command Index -or in another manual found via `Info-file-list-for-emacs'." +or in another manual found via COMMAND's `info-file' property or +the variable `Info-file-list-for-emacs'." (interactive "kFind documentation for key:") (let ((command (key-binding key))) (cond ((null command)