[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