ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/org/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/org/ob-ditaa.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\300\302!\207" [require ob org-compat] 2)
#@56 Default arguments for evaluating a ditaa source block.
(defvar org-babel-default-header-args:ditaa '((:results . "file") (:exports . "results") (:java . "-Dfile.encoding=UTF-8")) (#$ . 477))
(byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\305\306\307&\210\300\313\314\315\304\305\316\317\320\321\306\307& \210\300\322\323\324\304\305\316\325\306\307& \207" [custom-declare-variable org-ditaa-jar-path (expand-file-name "ditaa.jar" (file-name-as-directory (expand-file-name "scripts" (file-name-as-directory (expand-file-name "../contrib" (file-name-directory (org-find-library-dir "org"))))))) "Path to the ditaa jar executable." :group org-babel :type string org-babel-ditaa-java-cmd "java" "Java executable to use when evaluating ditaa blocks." org-ditaa-eps-jar-path (expand-file-name "DitaaEps.jar" (file-name-directory org-ditaa-jar-path)) "Path to the DitaaEps.jar executable." :version "24.4" :package-version (Org . "8.0") org-ditaa-jar-option "-jar" "Option for the ditaa jar file.\nDo not leave leading or trailing spaces in this string." "24.1"] 12)
#@105 Execute a block of Ditaa code with org-babel.
This function is called by `org-babel-execute-src-block'.
(defalias 'org-babel-execute:ditaa #[(body params) "\306\307\310\"A\206\n \311!\307\312\"A\211\206 \313\314!)\307\315\"A \307\316\"A \317\320! '\307\321\"A ()\322
\322*\322\323\324(\203G +\202I ,!!\322\f\322\325'!\322\325 !\260
-\326 !\327\230\204j \307\330\"A\205x \331\322\325'\332P!\333\325 !\260 .\334,!\204\207 \313\335,\"\210'\336\337\340!! / 0\341\216r/q\2101c\210)r/q\210\342\343\2110\343\344%\210,\345-!\210\346-!\210.\203\306 \345.!\210\346.!\210.\343\207" [params result-params el out-file cmdline java split-string assoc :results "" :file error "ditaa code block requires :file header argument" :cmdline :java org-babel-temp-file "ditaa-" :eps " " shell-quote-argument expand-file-name org-babel-process-file-name file-name-extension "pdf" :pdf "epstopdf" ".eps" " -o=" file-exists-p "Could not find ditaa.jar at %s" get-buffer-create generate-new-buffer-name " *temp file*" #[nil "\301!\205 \302!\207" [#1=#:temp-buffer buffer-name kill-buffer] 2] write-region nil 0 message shell-command in-file eps org-babel-ditaa-java-cmd org-ditaa-jar-option org-ditaa-eps-jar-path org-ditaa-jar-path cmd pdf-cmd #1# #2=#:temp-file body] 15 (#$ . 1569)])
#@58 Return an error because ditaa does not support sessions.
(defalias 'org-babel-prep-session:ditaa #[(session params) "\300\301!\207" [error "Ditaa does not support sessions"] 2 (#$ . 2870)])
(provide 'ob-ditaa)
Kontol Shell Bypass