JezK
Edit File: org-info.elc
;ELC ;;; Compiled by mockbuild@buildfarm03-new.corp.cloudlinux.com on Wed Aug 19 23:53:16 2026 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/org/org-info.el ;;; in Emacs version 24.3.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\302\303\304\"\210\305\306\307\"\207" [require org org-add-link-type "info" org-info-open add-hook org-store-link-functions org-info-store-link] 3) #@40 Store a link to an Info file and node. (defalias 'org-info-store-link #[nil "\305=\205) \306\211\307\310 !\311\fR\310 !\311\fQ\312\313\314\315 \316\f\317\n\320 &\n\210\n*\207" [major-mode desc link Info-current-file Info-current-node Info-mode nil "info:" file-name-nondirectory "#" org-store-link-props :type "info" :file :node :link :desc] 11 (#$ . 728)]) #@54 Follow an Info file and node link specified by PATH. (defalias 'org-info-open #[(path) "\301!\207" [path org-info-follow-link] 2 (#$ . 1097)]) #@54 Follow an Info file and node link specified by NAME. (defalias 'org-info-follow-link #[(name) "\301\302\"\204 \301\303\"\203, \304\305!\210\306\307\"\203$ \310\306\311\"\306\307\"\"\207\310\306\311\"\312\"\207\313\314\"\207" [name string-match "\\(.*\\)[#:]:?\\(.*\\)" "\\(.*\\)" require info match-string 2 Info-find-node 1 "Top" message "Could not open: %s"] 5 (#$ . 1247)]) (provide 'org-info)