| Server IP : 217.160.0.212 / Your IP : 216.73.216.15 Web Server : Apache System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/org/ |
Upload File : |
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.
(byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\311\312&\207" [require doc-view ol org-link-set-parameters "docview" :follow org-docview-open :export org-docview-export :store org-docview-store-link] 8)
#@69 Export a docview link from Org files.
(fn LINK DESCRIPTION FORMAT)
(defalias 'org-docview-export #[771 "\300\301\"\203 \302\303\"\202 \206 ;\2057 \304!\262\305\267\2026 \306\307#\207\306\310#\207\306\311#\207\207" [string-match "\\(.+\\)::.+" match-string 1 expand-file-name #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (html 36 latex 42 ascii 48)) format "<a href=\"%s\">%s</a>" "\\href{%s}{%s}" "%s (%s)"] 9 (#$ . 303)])
#@15
(fn LINK _)
(defalias 'org-docview-open #[514 "\300\301\"\210\302\303\"\304\224\205 \305\302\304\"!\306\303\"\210\211\205 \307!\207" [string-match "\\(.*?\\)\\(?:::\\([0-9]+\\)\\)?$" match-string 1 2 string-to-number org-open-file doc-view-goto-page] 7 (#$ . 792)])
#@35 Store a link to a docview buffer.
(defalias 'org-docview-store-link #[0 "\302=\205 \303\304!\305\306\307!R\310\311\312\313\314&\266\203\207" [major-mode buffer-file-name doc-view-mode image-mode-window-get page "docview:" "::" number-to-string org-link-store-props :type "docview" :link :description] 10 (#$ . 1073)])
#@130 Use the existing file name completion for file.
Links to get the file name, then ask the user for the page number
and append it.
(defalias 'org-docview-complete-link #[0 "\300\301\302\303 #\304\305\306\307\"Q\207" [replace-regexp-in-string "^file:" "docview:" org-link-complete-file "::" read-from-minibuffer "Page:" "1"] 5 (#$ . 1407)])
(provide 'ol-docview)