(Info-goto-emacs-command-node): If command

is given as a string, convert it to a symbol.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6409f873837aabc5f523a60db17a44bf861b5fde..402bc2ebb29686850d0bfac43785d0b0bf3594a2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-04-06  Masatake YAMATO  <jet@gyve.org>
+
+       * info.el (Info-goto-emacs-command-node): If command 
+       is given as a string, convert it to a symbol.
+
 2003-04-05  Kevin Ryde  <user42@zip.com.au>
 
        * info-look.el (emacs-lisp-mode): Add prefix/suffix matching regexps.

diff --git a/lisp/info.el b/lisp/info.el
index 2b639be15285576835471645dc3495446113a116..b93c980361eef980bcbcb86278c6a6c062c9779a 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2586,8 +2586,12 @@ The locations are of the format used in `Info-history', i.e.
   "Go to the Info node in the Emacs manual for command COMMAND.
 The command is found by looking up in Emacs manual's indices
 or in another manual found via COMMAND's `info-file' property or
-the variable `Info-file-list-for-emacs'."
+the variable `Info-file-list-for-emacs'. COMMAND must be a symbol
+or string."
   (interactive "CFind documentation for command: ")
+  ;; If command is given as a string, convert it to a symbol.
+  (if (stringp command)
+      (setq command (intern command)))  
   (or (commandp command)
       (signal 'wrong-type-argument (list 'commandp command)))
   (let ((where (Info-find-emacs-command-nodes command)))