From 5905e37a581d4cf2a4a517593c91730d836b6471 Mon Sep 17 00:00:00 2001 From: Evgenii Klimov Date: Sun, 16 Jul 2023 13:14:38 +0100 Subject: [PATCH] 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 b1b0a0a53..07e75f4d3 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) -- 2.34.1