[elpa] externals/inspector d7c5e7cb29 2/4: Apply fixes suggested by Stefan Monnier

[ELPA Syncer]

branch: externals/inspector
commit d7c5e7cb292eb23e66de78ae12ede15323bd0531
Author: Mariano Montone <marianomontone@gmail.com>
Commit: Mariano Montone <marianomontone@gmail.com>

    Apply fixes suggested by Stefan Monnier
    
    See: https://lists.gnu.org/archive/html/emacs-devel/2022-05/msg01147.html
---
 README.md    |  2 --
 inspector.el | 12 ++++++------
 2 files changed, 6 insertions(+), 8 deletions(-)

diff --git a/README.md b/README.md
index 06a6d142be..57d527e6b1 100644
--- a/README.md
+++ b/README.md
@@ -6,8 +6,6 @@ Inspector tool for Emacs Lisp objects.
 
 Similar to inspectors available for Smalltalk and Common Lisp, but for Emacs 
Lisp.
 
-DEMO VIDEO: 
https://drive.google.com/file/d/1808JlDM0q-aW4woZQBscatxp6omIR2j8/view
-
 ![emacs-inspector.png](emacs-inspector.png "Emacs Inspector")
 
 ## Installation
diff --git a/inspector.el b/inspector.el
index 4460d0b005..61ee4f4fba 100644
--- a/inspector.el
+++ b/inspector.el
@@ -1,6 +1,6 @@
 ;;; inspector.el --- Tool for inspection of Emacs Lisp objects.  -*- 
lexical-binding: t -*-
 
-;; Copyright (C) 2021 Mariano Montone
+;; Copyright (C) 2021-2022 Free Software Foundation, Inc.
 
 ;; Author: Mariano Montone <marianomontone@gmail.com>
 ;; URL: https://github.com/mmontone/emacs-inspector
@@ -616,7 +616,7 @@ When PRESERVE-HISTORY is T, inspector history is not 
cleared."
 
 ;;;###autoload
 (defun inspect-last-sexp ()
-  "Evaluate and inspect sexp before point."
+  "Evaluate sexp before point and inspect the result."
   (interactive)
   (let ((result (eval (eval-sexp-add-defvars (elisp--preceding-sexp)) 
lexical-binding)))
     (inspector-inspect result)))
@@ -624,7 +624,7 @@ When PRESERVE-HISTORY is T, inspector history is not 
cleared."
 ;;-- Inspection from Emacs debugger
 
 ;;;###autoload
-(defun debugger-inspect-locals ()
+(defun inspect-debugger-locals ()
   "Inspect local variables of the frame at point in debugger backtrace."
   (interactive)
   (let* ((nframe (debugger-frame-number))
@@ -632,7 +632,7 @@ When PRESERVE-HISTORY is T, inspector history is not 
cleared."
     (inspector-inspect (inspector--alist-to-plist locals))))
 
 ;;;###autoload
-(defun debugger-inspect-current-frame ()
+(defun inspect-debugger-current-frame ()
   "Inspect current frame in debugger backtrace."
   (interactive)
   (let* ((nframe (debugger-frame-number))
@@ -640,7 +640,7 @@ When PRESERVE-HISTORY is T, inspector history is not 
cleared."
     (inspector-inspect frame)))
 
 ;;;###autoload
-(defun debugger-inspect-frame-and-locals ()
+(defun inspect-debugger-frame-and-locals ()
   "Inspect current frame and locals in debugger backtrace."
   (interactive)
   (let* ((nframe (debugger-frame-number))
@@ -652,7 +652,7 @@ When PRESERVE-HISTORY is T, inspector history is not 
cleared."
 ;;--------- Inspector mode ---------------------------------
 
 ;; Press letter 'i' in debugger backtrace to inspect locals.
-(define-key debugger-mode-map (kbd "i") #'debugger-inspect-frame-and-locals)
+(define-key debugger-mode-map (kbd "i") #'inspect-debugger-frame-and-locals)
 
 (defvar inspector-mode-map
   (let ((map (make-keymap)))