;ELC
|
;;; Compiled
|
;;; in Emacs version 26.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)])
|
#@363 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.
|
|
(fn BODY PARAMS)
|
(defalias 'org-babel-plantuml-make-body #[514 "\300\301\302!#\303Q\207" ["@startuml\n" org-babel-expand-body:generic org-babel-variable-assignments:plantuml "\n@enduml"] 8 (#$ . 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\316 \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\344\345\346!\347\346!\260\350!\204\331 \302\351\"\210\352\353\354!!\355\356\357\360\361!\362\"\363$\216r\211q\210c\210)r\211q\210\364\365\211\365\356%\210*\266\366\367\"\210\370\310\"\210\365\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" "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" get-buffer-create generate-new-buffer-name " *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] 28 (#$ . 1901)])
|
#@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 (#$ . 3542)])
|
(provide 'ob-plantuml)
|
