[elpa] externals/org d6f3aed7b1: testing/lisp/test-ob-tangle.el: Avoid interaction in test

[ELPA Syncer]

branch: externals/org
commit d6f3aed7b1b01df7b092a47099205847b34fdd37
Author: Evgenii Klimov <eugene.dev@lipklim.org>
Commit: Ihor Radchenko <yantar92@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)