comparison lisp/info.el @ 50454:583825022e8f

(Info-goto-emacs-command-node): If command is given as a string, convert it to a symbol.
author Masatake YAMATO <jet@gyve.org>
date Sat, 05 Apr 2003 18:01:14 +0000
parents bb8b212f5326
children 4d6ac18fff69
comparison
equal deleted inserted replaced
50453:e499daf7fb22 50454:583825022e8f
2584 ;;;###autoload 2584 ;;;###autoload
2585 (defun Info-goto-emacs-command-node (command) 2585 (defun Info-goto-emacs-command-node (command)
2586 "Go to the Info node in the Emacs manual for command COMMAND. 2586 "Go to the Info node in the Emacs manual for command COMMAND.
2587 The command is found by looking up in Emacs manual's indices 2587 The command is found by looking up in Emacs manual's indices
2588 or in another manual found via COMMAND's `info-file' property or 2588 or in another manual found via COMMAND's `info-file' property or
2589 the variable `Info-file-list-for-emacs'." 2589 the variable `Info-file-list-for-emacs'. COMMAND must be a symbol
2590 or string."
2590 (interactive "CFind documentation for command: ") 2591 (interactive "CFind documentation for command: ")
2592 ;; If command is given as a string, convert it to a symbol.
2593 (if (stringp command)
2594 (setq command (intern command)))
2591 (or (commandp command) 2595 (or (commandp command)
2592 (signal 'wrong-type-argument (list 'commandp command))) 2596 (signal 'wrong-type-argument (list 'commandp command)))
2593 (let ((where (Info-find-emacs-command-nodes command))) 2597 (let ((where (Info-find-emacs-command-nodes command)))
2594 (if where 2598 (if where
2595 (let ((num-matches (length where))) 2599 (let ((num-matches (length where)))