| Current Path : /usr/share/emacs/24.3/lisp/org/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/org/ob-ditaa.elc |
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:39 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/org/ob-ditaa.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\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")) (#$ . 622)) #@88 Option for the ditaa jar file. Do not leave leading or trailing spaces in this string. (custom-declare-variable 'org-ditaa-jar-option "-jar" '(#$ . 819) :group 'org-babel :version "24.1" :type 'string) #@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! !\321 \322\"\322\323\324#!!\322\f\322\325!!\322\325 !\260\f $\326#!\204T \313\327#\"\210!\330\331\332!! % &\333\216r%q\210'c\210)r%q\210\334\335\211&\335\336%\210,\337$!\210\340$!\210.\335\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-" "java " " " shell-quote-argument expand-file-name org-babel-process-file-name file-exists-p "Could not find ditaa.jar at %s" get-buffer-create generate-new-buffer-name " *temp file*" ((byte-code "\301!\203\n \302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) write-region nil 0 message shell-command in-file org-ditaa-jar-option org-ditaa-jar-path cmd #1# #2=#:temp-file body] 14 (#$ . 1028)]) #@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 (#$ . 2091)]) (provide 'ob-ditaa)