test-ob-java: Test Java source block header arguments at all levels

* testing/lisp/test-ob-java.el (ob-java/lint-header-arguments):
Rename to ob-java/lint-header-args-block.

* testing/lisp/test-ob-java.el (ob-java/lint-header-args-heading):
Test source block header arguments at the heading level.

* testing/lisp/test-ob-java.el (ob-java/lint-header-args-buffer):
Test source block header arguments at the buffer level.

Reported-by: Rudolf Adamkovič <salutis@me.com>
Link: https://orgmode.org/list/m2y1ta9rqe.fsf@me.com
This commit is contained in:
Rudolf Adamkovič 2022-10-21 14:48:56 +02:00 committed by Ihor Radchenko
parent e700578799
commit bed47b437d
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 30 additions and 1 deletions

View File

@ -27,7 +27,36 @@
;;; No Java required
(ert-deftest ob-java/lint-header-arguments ()
(ert-deftest ob-java/lint-header-args-buffer ()
;; Test that the Org linter accepts every supported Java source
;; block header argument at the buffer level.
(org-test-with-temp-text "
#+property: header-args:java+ :dir /tmp
#+property: header-args:java+ :classname com.example.Example
#+property: header-args:java+ :imports com.example.OtherExample
#+property: header-args:java+ :cmpflag -classpath .:/tmp/example/
#+property: header-args:java+ :cmdline -classpath .:/tmp/example/
#+property: header-args:java+ :cmdarg -verbose"
(should-not (org-lint '(wrong-header-argument)))))
(ert-deftest ob-java/lint-header-args-heading ()
;; Test that the Org linter accepts every supported Java source
;; block header argument at the heading level.
(org-test-with-temp-text "
* Test
:PROPERTIES:
:header-args:java+: :dir /tmp
:header-args:java+: :classname com.example.Example
:header-args:java+: :imports com.example.OtherExample
:header-args:java+: :cmpflag -classpath .:/tmp/example/
:header-args:java+: :cmdline -classpath .:/tmp/example/
:header-args:java+: :cmdarg -verbose
:END:"
(should-not (org-lint '(wrong-header-argument)))))
(ert-deftest ob-java/lint-header-args-block ()
;; Test that the Org linter accepts every supported Java source
;; block header argument at the block level.
(org-test-with-temp-text "
#+header: :dir /tmp
#+header: :classname com.example.Example