branch: externals/inspector
commit 683313d9bd7067780b13fb5b93e87215539c753b
Author: Mariano Montone <marianomont...@gmail.com>
Commit: Mariano Montone <marianomont...@gmail.com>
tree-inspector: records test
---
tree-inspector-tests.el | 8 +++-----
1 file changed, 3 insertions(+), 5 deletions(-)
diff --git a/tree-inspector-tests.el b/tree-inspector-tests.el
index 2479f395a0..f7913d9a03 100644
--- a/tree-inspector-tests.el
+++ b/tree-inspector-tests.el
@@ -189,13 +189,11 @@
(should (cl-search "factorial" buffer-string))))
(ert-deftest tree-inspector-tests--inspect-record-test ()
- (tree-inspector-inspect (record 'foo 23 [bar baz] "rats"))
- (let ((buffer-string (buffer-string)))
- (should (cl-search "record" buffer-string))
+ (tree-inspector-tests--with-tree-inspector-contents
+ (buffer-string (record 'foo 23 [bar baz] "rats"))
(should (cl-search "foo" buffer-string))
(should (cl-search "23" buffer-string))
- (should (cl-search "rats" buffer-string)))
- (inspector-quit))
+ (should (cl-search "rats" buffer-string))))
(ert-deftest inspector-tests--inspect-finalizer-test ()
(inspector-inspect (make-finalizer #'print)))
