emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/inspector c0ccc64cfb 1/3: Revert "Add command alternati


From: ELPA Syncer
Subject: [elpa] externals/inspector c0ccc64cfb 1/3: Revert "Add command alternatives for C-x C-e and M-:"
Date: Fri, 5 May 2023 09:58:47 -0400 (EDT)

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

    Revert "Add command alternatives for C-x C-e and M-:"
    
    This reverts commit d24bc65a6a21bfa2a7466d565eb9174e6423b2db.
---
 README.md    | 10 ----------
 inspector.el | 23 -----------------------
 2 files changed, 33 deletions(-)

diff --git a/README.md b/README.md
index dbeb25c54c..187e4f8dd9 100644
--- a/README.md
+++ b/README.md
@@ -23,16 +23,6 @@ This package is available from ELPA.
 * `M-x inspector-inspect-expression` to evaluate an elisp expression and 
inspect the result.
 * `M-x inspector-inspect-last-sexp` to evaluate last sexp in current buffer 
and inspect the result.
 
- Or add the following to your config:
-
-```lisp
-(define-key global-map [remap eval-last-sexp] #'inspector-eval-last-sexp)
-(define-key global-map [remap eval-expression] #'inspector-eval-expression)
-```
-
-and then use `C-u C-x C-e` and `C-u M-:` as alternatives to
-`eval-last-sexp` and `eval-expression`.
-
 ### Inside the inspector
 
 * `M-x inspector-pop` bound to letter `l`, to navigate to previous object.
diff --git a/inspector.el b/inspector.el
index 942acbddcd..fc70e30318 100644
--- a/inspector.el
+++ b/inspector.el
@@ -30,12 +30,6 @@
 ;;     M-x `inspector-inspect-expression' to evaluate an elisp expression and 
inspect the result.
 ;;     M-x `inspector-inspect-last-sexp' to evaluate last sexp in current 
buffer and inspect the result.
 ;;
-;;     Or add the following to your config:
-;;     (define-key global-map [remap eval-last-sexp] 
#'inspector-eval-last-sexp)
-;;     (define-key global-map [remap eval-expression] 
#'inspector-eval-expression)
-;;     and then use C-u C-x C-e and C-u M-: as alternatives to
-;;     `eval-last-sexp' and `eval-expression'.
-;;
 ;; Inside the inspector:
 ;;
 ;;     M-x `inspector-pop' bound to letter l, to navigate to previous object.
@@ -799,15 +793,6 @@ is expected to be used.")
 
   (inspector-inspect (eval exp t)))
 
-;;;###autoload
-(defun inspector-eval-expression (arg)
-  "Like `eval-expression', but also inspect when called with prefix ARG."
-  (interactive "P")
-  (pcase arg
-    ('(4) (let ((current-prefix-arg nil))
-           (call-interactively #'inspector-inspect-expression)))
-    (_ (call-interactively #'eval-expression))))
-
 (defun inspector--basic-inspect (object)
   "Create and prepare a new buffer for inspecting OBJECT."
   (defvar *)
@@ -870,14 +855,6 @@ When PRESERVE-HISTORY is T, inspector history is not 
cleared."
   (let ((result (eval (eval-sexp-add-defvars (elisp--preceding-sexp)) 
lexical-binding)))
     (inspector-inspect result)))
 
-;;;###autoload
-(defun inspector-eval-last-sexp (arg)
-  "Like `eval-last-sexp', but also inspect when called with prefix ARG."
-  (interactive "P")
-  (pcase arg
-    ('(4) (inspector-inspect-last-sexp))
-    (_ (call-interactively #'eval-last-sexp))))
-
 (defun inspector--elisp-defun-at-point ()
   "Return the name of the function at point."
   (save-excursion



reply via email to

[Prev in Thread] Current Thread [Next in Thread]