branch: externals/inspector
commit 3ad0ba89517cb5c9900a170401460e7da7f4babc
Author: Mariano Montone <marianomont...@gmail.com>
Commit: Mariano Montone <marianomont...@gmail.com>

    tree-inspector-inspect-expression command
---
 tree-inspector.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/tree-inspector.el b/tree-inspector.el
index 70375b83c7..2573b2fcd7 100644
--- a/tree-inspector.el
+++ b/tree-inspector.el
@@ -513,6 +513,13 @@ DATA can be any Emacs Lisp object."
   (let ((result (eval (eval-sexp-add-defvars (elisp--preceding-sexp)) 
lexical-binding)))
     (tree-inspector-inspect result)))
 
+;;;###autoload
+(defun tree-inspector-inspect-expression (exp)
+  "Evaluate EXP and inspect its result with a tree-inspector."
+  (interactive (list (read--expression "Eval and inspect: ")))
+
+  (tree-inspector-inspect (eval exp t)))
+
 (provide 'tree-inspector)
 
 ;;; tree-inspector.el ends here

Reply via email to