>From 54f008cdfcf4680b3d3bc7107aa640596d5a91bb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Rudolf=20Adamkovi=C4=8D?= Date: Thu, 20 Oct 2022 21:31:37 +0200 Subject: [PATCH] ob-java: Define the list of all supported header arguments * lisp/ob-java.el (org-babel-header-args:java): Complete the list of header arguments supported for Java source blocks. * testing/lisp/test-ob-java.el (ob-java/lint-header-arguments): Test that the linter approves of all the supported arguments. --- lisp/ob-java.el | 8 +++++++- testing/lisp/test-ob-java.el | 17 +++++++++++++++++ 2 files changed, 24 insertions(+), 1 deletion(-) diff --git a/lisp/ob-java.el b/lisp/ob-java.el index 832214f5c..395dbd20d 100644 --- a/lisp/ob-java.el +++ b/lisp/ob-java.el @@ -53,7 +53,13 @@ directory, so we keep that as the default behavior. [1] https://orgmode.org/manual/Results-of-Evaluation.html") -(defconst org-babel-header-args:java '((imports . :any)) +(defconst org-babel-header-args:java + '((dir . :any) + (classname . :any) + (imports . :any) + (cmpflag . :any) + (cmdline . :any) + (cmdarg . :any)) "Java-specific header arguments.") (defcustom org-babel-java-command "java" diff --git a/testing/lisp/test-ob-java.el b/testing/lisp/test-ob-java.el index 215f1cb51..a62d66557 100644 --- a/testing/lisp/test-ob-java.el +++ b/testing/lisp/test-ob-java.el @@ -21,9 +21,26 @@ ;; along with this program. If not, see . ;;; Code: + (require 'org-test "../testing/org-test") (require 'ob-core) +;;; No Java required + +(ert-deftest ob-java/lint-header-arguments () + (org-test-with-temp-text " +#+header: :dir /tmp +#+header: :classname com.example.Example +#+header: :imports com.example.OtherExample +#+header: :cmpflag -classpath .:/tmp/example/ +#+header: :cmdline -classpath .:/tmp/example/ +#+header: :cmdarg -verbose +#+begin_src java +#+end_src" + (should-not (org-lint '(wrong-header-argument))))) + +;;; Java required + (org-test-for-executable "java") (org-test-for-executable "javac") (unless (featurep 'ob-java) -- 2.38.0