ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/org/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/org/org-info.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.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 (#$ . 583)])
#@54 Follow an Info file and node link specified by PATH.
(defalias 'org-info-open #[(path) "\301!\207" [path org-info-follow-link] 2 (#$ . 952)])
#@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 (#$ . 1101)])
(provide 'org-info)
Kontol Shell Bypass