branch: externals/inspector
commit d5d286c5de7ed3b67878be18e428e7975f80e502
Author: Mariano Montone <marianomont...@gmail.com>
Commit: Mariano Montone <marianomont...@gmail.com>
inspect-last-sexp command
---
inspector.el | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/inspector.el b/inspector.el
index 15282762d1..cde232655b 100644
--- a/inspector.el
+++ b/inspector.el
@@ -183,6 +183,12 @@ When ADD-TO-HISTORY is T, OBJECT is added to inspector
history for navigation pu
(let ((object (pop inspector-history)))
(inspector-inspect object))))
+(defun inspect-last-sexp ()
+ "Evaluate and inspect sexp before point."
+ (interactive)
+ (let ((result (eval (eval-sexp-add-defvars (elisp--preceding-sexp))
lexical-binding)))
+ (inspector-inspect result)))
+
(defgroup inspector nil
"Emacs Lisp inspector customizations."
:group 'lisp)
