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

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

View file

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