diff options
| -rw-r--r-- | test/test-lib.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test/test-lib.el b/test/test-lib.el index 5b32e0ab..6271da22 100644 --- a/test/test-lib.el +++ b/test/test-lib.el @@ -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))) |