From 839cb3194e6a40e577c5cab3b0a69961238924c9 Mon Sep 17 00:00:00 2001 From: "Rainer M. Krug" Date: Mon, 2 May 2016 11:00:23 +0200 Subject: [PATCH] lisp/op-plantuml.el: Add new output formats * lisp/ob-paltuml (org-babel-execute:plantuml): add new output formats of plantuml: - pdf : this needs extra java mudules to run which are mentioned on the plantml website (http://fr.plantuml.com/pdf.html) - vdx - xmi - scxml - html - txt (ascii art) - utxt (ascii art using unicode) The output format is based on the extension of the output file. --- lisp/ob-plantuml.el | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/lisp/ob-plantuml.el b/lisp/ob-plantuml.el index 0e07f2d..6cc55a2 100644 --- a/lisp/ob-plantuml.el +++ b/lisp/ob-plantuml.el @@ -59,10 +59,26 @@ This function is called by `org-babel-execute-src-block'." (concat "java " java " -jar " (shell-quote-argument (expand-file-name org-plantuml-jar-path)) + (if (string= (file-name-extension out-file) "png") + " -tpng" "") (if (string= (file-name-extension out-file) "svg") " -tsvg" "") (if (string= (file-name-extension out-file) "eps") " -teps" "") + (if (string= (file-name-extension out-file) "pdf") + " -tpdf" "") + (if (string= (file-name-extension out-file) "vdx") + " -tvdx" "") + (if (string= (file-name-extension out-file) "xmi") + " -txmi" "") + (if (string= (file-name-extension out-file) "scxml") + " -tscxml" "") + (if (string= (file-name-extension out-file) "html") + " -thtml" "") + (if (string= (file-name-extension out-file) "txt") + " -ttxt" "") + (if (string= (file-name-extension out-file) "utxt") + " -utxt" "") " -p " cmdline " < " (org-babel-process-file-name in-file) " > " -- 2.8.2