From fa80571d44bcf94a50e55518669c4e5dcc1c76cc Mon Sep 17 00:00:00 2001
From: Alexandre Duret-Lutz <adl@lrde.epita.fr>
Date: Fri, 7 Oct 2016 15:29:41 +0200
Subject: [PATCH] org: avoid displaying the plantuml log during builds

* doc/org/.dir-locals.el.in, doc/org/init.el.in: Make sure plantuml is
started via "java -Djava.awt.headless".
---
 doc/org/.dir-locals.el.in | 7 +++++++
 doc/org/init.el.in        | 8 ++++++++
 2 files changed, 15 insertions(+)

diff --git a/doc/org/.dir-locals.el.in b/doc/org/.dir-locals.el.in
index 66a2345c3..5459cad8f 100644
--- a/doc/org/.dir-locals.el.in
+++ b/doc/org/.dir-locals.el.in
@@ -35,6 +35,13 @@
 	      (org-babel-C++-compiler . "./g++wrap")
 	      (shell-file-name . "@SHELL@")
               (org-export-html-postamble . nil)
+              (org-babel-default-header-args:plantuml
+               . ((:results . "file")
+                  (:exports . "results")
+                  ; Prevent the plantuml logo to annoying appear on
+                  ; top of whatever you are doing when the project
+                  ; compiles in the background.
+                  (:java . "-Djava.awt.headless")))
 	      (org-publish-project-alist
 	       . (("spot-html"
 		   :base-directory "."
diff --git a/doc/org/init.el.in b/doc/org/init.el.in
index 69c16f302..ceaa4c34f 100644
--- a/doc/org/init.el.in
+++ b/doc/org/init.el.in
@@ -31,6 +31,14 @@
 (setq org-babel-C++-compiler "./g++wrap")
 (setq shell-file-name "@SHELL@")
 
+(setq org-babel-default-header-args:plantuml
+      '((:results . "file")
+        (:exports . "results")
+        ;; prevent the plantuml logo to annoying appear on top of
+        ;; whatever you are doing when the project compiles in the
+        ;; background.
+        (:java . "-Djava.awt.headless")))
+
 (setenv "PATH"
 	(concat "@abs_top_builddir@/bin" path-separator (getenv "PATH")))
 (setenv "PYTHONPATH"