Re: [PATCH] ob-java: Define the list of all supported header arguments

[Max Nikulin]

Am I the only person who gets

3 unexpected results:
   FAILED  ob-java/lint-header-args-block
   FAILED  ob-java/lint-header-args-buffer
   FAILED  ob-java/lint-header-args-heading

Emacs-27.1. Example of failure:

Test ob-java/lint-header-args-block backtrace:
  signal(ert-test-failed (((should-not (org-lint '(wrong-header-argume
  ert-fail(((should-not (org-lint '(wrong-header-argument))) :form (or
  (if (not (unwind-protect (setq value-602 (apply fn-600 args-601)) (s
  (let (form-description-604) (if (not (unwind-protect (setq value-602
  (let ((value-602 'ert-form-evaluation-aborted-603)) (let (form-descr
  (let* ((fn-600 #'org-lint) (args-601 (condition-case err (let ((sign
  (progn (org-mode) (let ((point (string-match "<point>" inside-text))
  (unwind-protect (progn (org-mode) (let ((point (string-match "<point
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
  (let ((inside-text (if (stringp "\n#+header: :dir /tmp\n#+header: :c
  (closure (t) nil (let ((inside-text (if (stringp "\n#+header: :dir /
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name ob-java/lint-header-args-block :docum
  ert-run-or-rerun-test(#s(ert--stats :selector "\\(org\\|ob\\|ox\\...
  ert-run-tests("\\(org\\|ob\\|ox\\)" #f(compiled-function (event-type
  ert-run-tests-batch("\\(org\\|ob\\|ox\\)")
  ert-run-tests-batch-and-exit("\\(org\\|ob\\|ox\\)")
  (let ((org-id-track-globally t) (org-test-selector (if org-test-sele
  org-test-run-batch-tests("\\(org\\|ob\\|ox\\)")
  eval((org-test-run-batch-tests org-test-select-re) t)
  command-line-1(("--eval" "(setq vc-handled-backends nil org-startup-
  command-line()
  normal-top-level()
Test ob-java/lint-header-args-block condition:
    (ert-test-failed
     ((should-not
       (org-lint '...))
      :form
      (org-lint
       (wrong-header-argument))
      :value
      ((1
        ["8" "nil" "Unknown header argument \":classname\"" 
#s(org-lint-checker wrong-header-argument "Report wrong babel headers" 
org-lint-wrong-header-argument nil ...)])
       (2
        ["8" "nil" "Unknown header argument \":imports\"" 
#s(org-lint-checker wrong-header-argument "Report wrong babel headers" 
org-lint-wrong-header-argument nil ...)])
       (3
        ["8" "nil" "Unknown header argument \":cmpflag\"" 
#s(org-lint-checker wrong-header-argument "Report wrong babel headers" 
org-lint-wrong-header-argument nil ...)])
       (4
        ["8" "nil" "Unknown header argument \":cmdarg\"" 
#s(org-lint-checker wrong-header-argument "Report wrong babel headers" 
org-lint-wrong-header-argument nil ...)]))))
   FAILED   59/978  ob-java/lint-header-args-block (0.004049 sec)