From f3ca420c2760947917684cfff7e519cc446702f0 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Wed, 23 Oct 2019 13:04:25 -0400 Subject: [PATCH] lang/plantuml: fix ob-plantuml previews with jar If plantuml-default-exec-mode is 'server, the image is compiled via the website and downloaded. If it's 'executable it uses the local 'plantuml' executable (determined by plantuml-executable-path) to compile it. If it's 'jar it uses the local 'plantuml.jar' (determined by plantuml-jar-path). The first two were tested and work, but 'jar did not, until now. --- modules/lang/plantuml/autoload.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/modules/lang/plantuml/autoload.el b/modules/lang/plantuml/autoload.el index 7aaebaca9..7f1555621 100644 --- a/modules/lang/plantuml/autoload.el +++ b/modules/lang/plantuml/autoload.el @@ -30,12 +30,13 @@ This function is called by `org-babel-execute-src-block'." (error "Could not find plantuml at %s" (executable-find plantuml-executable-path))) (concat (shell-quote-argument (executable-find plantuml-executable-path)) - " --headless ")) - ((not (file-exists-p org-plantuml-jar-path)) + " --headless")) + ((not (file-exists-p plantuml-jar-path)) (error "Could not find plantuml.jar at %s" org-plantuml-jar-path)) ((concat "java " (cdr (assoc :java params)) " -jar " (shell-quote-argument - (expand-file-name plantuml-executable-path))))) + (expand-file-name plantuml-jar-path))))) + " " (pcase (file-name-extension out-file) ("png" "-tpng") ("svg" "-tsvg")