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