branch: externals/org
commit d6f3aed7b1b01df7b092a47099205847b34fdd37
Author: Evgenii Klimov <eugene....@lipklim.org>
Commit: Ihor Radchenko <yanta...@posteo.net>
testing/lisp/test-ob-tangle.el: Avoid interaction in test
* testing/lisp/test-ob-tangle.el (ob-tangle/detangle-false-positive):
Unset modification flag from buffer to kill
(testing/examples/babel.org) in tear down step of test to avoid Emacs
asking for confirmation during interactive testing from within Emacs.
---
testing/lisp/test-ob-tangle.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/testing/lisp/test-ob-tangle.el b/testing/lisp/test-ob-tangle.el
index b1b0a0a533..07e75f4d31 100644
--- a/testing/lisp/test-ob-tangle.el
+++ b/testing/lisp/test-ob-tangle.el
@@ -565,6 +565,8 @@ another block
(should (equal (string-trim (org-element-property
:value (org-element-at-point)))
";; detangle changes"))))
+ (with-current-buffer buffer
+ (set-buffer-modified-p nil))
(kill-buffer buffer))))
(provide 'test-ob-tangle)
