Ver código fonte

Use `info' instead of `Info-goto-node'.

Apply Glenn Morris patch of 2008-28-02.
emacs-diffs: <E1JUZlP-0007zY-Cw@cvs.savannah.gnu.org>
Bastien Guerry 17 anos atrás
pai
commit
b9c966a502
1 arquivos alterados com 2 adições e 4 exclusões
  1. 2 4
      org.el

+ 2 - 4
org.el

@@ -169,8 +169,7 @@ will be autoloaded when needed, to preloading is not necessary."
 	(const :tag "<A> Publishing (org-publish.el)" org-publish)
 	(const :tag "<A> LaTeX export (org-export-latex.el)" org-export-latex)
 	(const :tag "    IRC/ERC links (org-irc.el)" org-irc)
-	(const :tag "    Apple Mail message links under OS X (org-mac-message.el)" org-mac-message)
-))
+	(const :tag "    Apple Mail message links under OS X (org-mac-message.el)" org-mac-message)))
 
 (defun org-load-default-extensions ()
   "Load all extensions that are listed in `org-default-extensions'."
@@ -4222,7 +4221,6 @@ If it is less than 8, the level-1 face gets re-used for level N+1 etc."
                   (date string specifier &optional marker globcolor literal))
 (declare-function table--at-cell-p "table" (position &optional object at-column))
 (declare-function Info-find-node "info" (filename nodename &optional no-going-back))
-(declare-function Info-goto-node "info" (nodename &optional fork))
 (declare-function bbdb "ext:bbdb-com" (string elidep))
 (declare-function bbdb-company "ext:bbdb-com" (string elidep))
 (declare-function bbdb-current-record "ext:bbdb-com" (&optional planning-on-modifying))
@@ -27435,7 +27433,7 @@ See the individual commands for more information."
 With optional NODE, go directly to that node."
   (interactive)
   (require 'info)
-  (Info-goto-node (format "(org)%s" (or node ""))))
+  (info (format "(org)%s" (or node ""))))
 
 (defun org-install-agenda-files-menu ()
   (let ((bl (buffer-list)))