tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

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

Apply Glenn Morris patch of 2008-28-02.
emacs-diffs: <E1JUZlP-0007zY-Cw@cvs.savannah.gnu.org>
This commit is contained in:
Bastien Guerry 2008-02-28 08:47:18 +00:00
parent 9400ccfc75
commit b9c966a502
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
org.el
View File

@ -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> Publishing (org-publish.el)" org-publish)
(const :tag "<A> LaTeX export (org-export-latex.el)" org-export-latex) (const :tag "<A> LaTeX export (org-export-latex.el)" org-export-latex)
(const :tag " IRC/ERC links (org-irc.el)" org-irc) (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 () (defun org-load-default-extensions ()
"Load all extensions that are listed in `org-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)) (date string specifier &optional marker globcolor literal))
(declare-function table--at-cell-p "table" (position &optional object at-column)) (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-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 "ext:bbdb-com" (string elidep))
(declare-function bbdb-company "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)) (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." With optional NODE, go directly to that node."
(interactive) (interactive)
(require 'info) (require 'info)
(Info-goto-node (format "(org)%s" (or node "")))) (info (format "(org)%s" (or node ""))))
(defun org-install-agenda-files-menu () (defun org-install-agenda-files-menu ()
(let ((bl (buffer-list))) (let ((bl (buffer-list)))