From 0de0da6282081f176d44ef44326382b594d1b36b Mon Sep 17 00:00:00 2001 From: cxxxr Date: Sat, 7 Sep 2024 15:37:44 +0900 Subject: [PATCH] change `lisp-inspect (C-c I)` behavior --- extensions/lisp-mode/ext/inspector.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extensions/lisp-mode/ext/inspector.lisp b/extensions/lisp-mode/ext/inspector.lisp index ff5ab969c..d1dc8bfd0 100644 --- a/extensions/lisp-mode/ext/inspector.lisp +++ b/extensions/lisp-mode/ext/inspector.lisp @@ -60,7 +60,7 @@ (define-key *lisp-inspector-keymap* "M-q" 'lisp-inspector-quit) (define-key *lisp-inspector-keymap* "M-Return" 'lisp-inspector-copy-down-to-repl) -(define-command lisp-inspect (string &key (self-evaluation t) (focus nil)) +(define-command lisp-inspect (string &key (self-evaluation nil) (focus t)) ((or (symbol-string-at-point (current-point)) (prompt-for-sexp "Inspect value (evaluated): "))) (lisp-eval-async (if self-evaluation