debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-25 04:18:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

test: `notmuch-test-run' should protect against buffer switching.

Browse source 
The body of the test may cause the current buffer to change. Ensure
that the output goes to the correct buffer by switching back before
inserting it.
This commit is contained in:
David Edmondson 2012-01-26 07:19:38 +00:00 committed by David Bremner
parent c70c7f86b8
commit 2f50524e27
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
test/test-lib.el
View file

@ -92,7 +92,9 @@ nothing."
(defmacro notmuch-test-run (&rest body) (defmacro notmuch-test-run (&rest body)
"Evaluate a BODY of test expressions and output the result." "Evaluate a BODY of test expressions and output the result."
`(with-temp-buffer `(with-temp-buffer
(let ((result (progn ,@body))) (let ((buffer (current-buffer))
(result (progn ,@body)))
(switch-to-buffer buffer)
(insert (if (stringp result) (insert (if (stringp result)
result result
(prin1-to-string result))) (prin1-to-string result)))