branch: externals/org commit 1bec6a36f6295cb99c20e380f18f10ede16d56bd Author: Ihor Radchenko <yanta...@posteo.net> Commit: Ihor Radchenko <yanta...@posteo.net>
test-ob/demarcate-block-split-prefix-region: Do not rely on src indentation failing * testing/lisp/test-ob.el (test-ob/demarcate-block-split-prefix-region): The test passes -i flag that supposed to prevent indentation, but then asserts that indentation must happen. This is not right - the test passes simply because we are using non-existing language and lang-specific indentation code fails in this scenario and ignores -i flag. --- testing/lisp/test-ob.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/testing/lisp/test-ob.el b/testing/lisp/test-ob.el index 49dc1b80f7..870296acf7 100644 --- a/testing/lisp/test-ob.el +++ b/testing/lisp/test-ob.el @@ -2699,7 +2699,7 @@ do not org-indent-block text here (org-test-with-temp-text (format " ********** 10 stars with region between two lines #+header: :var b=\"also seen\" - #+begin_src any-language -i -n :var a=\"seen\" + #+begin_src any-language -n :var a=\"seen\" %s <point>%s %s @@ -2719,7 +2719,7 @@ do not org-indent-block text here (should (string= (nth n parts) (org-trim (nth 1 info)))) (should (string= "seen" (cdr (assq 'a vars)))) (should (string= "also seen" (cdr (assq 'b vars)))) - (should (string= "-i -n" (nth 3 info))) + (should (string= "-n" (nth 3 info))) (cl-incf n))) (goto-char (point-min)) (dolist (regexp `(,stars