;ELC ;;; Compiled ;;; in Emacs version 27.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'ob) #@59 Default arguments for evaluating a plantuml source block. (defvar org-babel-default-header-args:plantuml '((:results . "file") (:exports . "results")) (#$ . 422)) (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \207" [custom-declare-variable org-plantuml-jar-path funcall function #[0 "\300\207" [#1=""] 1 #1#] "Path to the plantuml.jar file." :group org-babel :version "24.1" :type string] 10) #@256 Return a list of PlantUML statements assigning the block's variables. PARAMS is a property list of source block parameters, which may contain multiple entries for the key `:var'. `:var' entries in PARAMS are expected to be scalar variables. (fn PARAMS) (defalias 'org-babel-variable-assignments:plantuml #[257 "\300\301\302!\"\207" [mapcar #[257 "\300\301@\302\303\304A##\207" [format "!define %s %s" replace-regexp-in-string "\"" ""] 8 "\n\n(fn PAIR)"] org-babel--get-vars] 5 (#$ . 840)]) #@458 Return PlantUML input string. BODY is the content of the source block and PARAMS is a property list of source block parameters. This function relies on the `org-babel-expand-body:generic' function to extract `:var' entries from PARAMS and on the `org-babel-variable-assignments:plantuml' function to convert variables to PlantUML assignments. If BODY does not contain @startXXX ... @endXXX clauses, @startuml ... @enduml will be added. (fn BODY PARAMS) (defalias 'org-babel-plantuml-make-body #[514 "\300!\301\302\303#\203\211\202\304\305\306#\"\207" [org-babel-variable-assignments:plantuml string-prefix-p "@start" t format "@startuml\n%s\n@enduml" org-babel-expand-body:generic] 9 (#$ . 1343)]) #@126 Execute a block of plantuml code with org-babel. This function is called by `org-babel-execute-src-block'. (fn BODY PARAMS) (defalias 'org-babel-execute:plantuml #[514 "\301\236A\206\n\302\303!\304\236A\305\306!\307\236A\206\310\311\"\310\230\203+\302\312!\202\334\313\314\315\316!!\317 !\320\230\203@\321\202A\310\317\n!\322\230\203N\323\202O\310\317 !\324\230\203\\\325\202]\310\317\f!\326\230\203j\327\202k\310\317 !\330\230\203x\331\202y\310\317!\332\230\203\206\333\202\207\310\317!\334\230\203\224\335\202\225\310\317!\336\230\203\242\337\202\243\310\317!\340\230\203\260\341\202\261\310\317!\342\230\203\276\343\202\277\310\317!\344\230\203\314\345\202\315\310\346\347\350!\351\350!\260\352!\204\347\302\353\"\210\354\355!\356\357\360\361\362!\363\"\364$\216r\211q\210c\210)r\211q\210\365\366\211\366\357%\210*\266\367\370\"\210\371\310\"\210\366\207" [org-plantuml-jar-path :file error "PlantUML requires a \":file\" header argument" :cmdline org-babel-temp-file "plantuml-" :java "" org-babel-plantuml-make-body "`org-plantuml-jar-path' is not set" "java " " -jar " shell-quote-argument expand-file-name file-name-extension "png" " -tpng" "svg" " -tsvg" "eps" " -teps" "pdf" " -tpdf" "tex" " -tlatex" "vdx" " -tvdx" "xmi" " -txmi" "scxml" " -tscxml" "html" " -thtml" "txt" " -ttxt" "utxt" " -utxt" " -p " " < " org-babel-process-file-name " > " file-exists-p "Could not find plantuml.jar at %s" generate-new-buffer " *temp file*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 write-region nil message "%s" org-babel-eval] 29 (#$ . 2061)]) #@82 Return an error because plantuml does not support sessions. (fn SESSION PARAMS) (defalias 'org-babel-prep-session:plantuml #[514 "\300\301!\207" [error "Plantuml does not support sessions"] 4 (#$ . 3732)]) (provide 'ob-plantuml)