mirror of
https://github.com/protesilaos/dotfiles.git
synced 2026-09-10 07:16:20 -04:00
emacs: use "macroexpand" term in the name of my custom command
This way it is more faithful to what it does and I can find it more easily via M-x.
This commit is contained in:
parent
6f67eebe61
commit
3d5b125c7b
|
|
@ -29,10 +29,10 @@
|
|||
:bind
|
||||
( :map emacs-lisp-mode-map
|
||||
("C-j" . prot-elisp-eval-and-print-last-sexp) ; overrides `electric-newline-and-maybe-indent'
|
||||
("C-c C-p" . prot-elisp-pp-last-sexp)
|
||||
("C-c C-p" . prot-elisp-pp-macroexpand-last-sexp)
|
||||
:map lisp-interaction-mode-map
|
||||
("C-j" . prot-elisp-eval-and-print-last-sexp) ; overrides `eval-print-last-sexp'
|
||||
("C-c C-p" . prot-elisp-pp-last-sexp)))
|
||||
("C-c C-p" . prot-elisp-pp-macroexpand-last-sexp)))
|
||||
|
||||
;;;; Disable "electric" behaviour
|
||||
(use-package electric
|
||||
|
|
|
|||
|
|
@ -8617,10 +8617,10 @@ will not mess up with my work.
|
|||
:bind
|
||||
( :map emacs-lisp-mode-map
|
||||
("C-j" . prot-elisp-eval-and-print-last-sexp) ; overrides `electric-newline-and-maybe-indent'
|
||||
("C-c C-p" . prot-elisp-pp-last-sexp)
|
||||
("C-c C-p" . prot-elisp-pp-macroexpand-last-sexp)
|
||||
:map lisp-interaction-mode-map
|
||||
("C-j" . prot-elisp-eval-and-print-last-sexp) ; overrides `eval-print-last-sexp'
|
||||
("C-c C-p" . prot-elisp-pp-last-sexp)))
|
||||
("C-c C-p" . prot-elisp-pp-macroexpand-last-sexp)))
|
||||
#+end_src
|
||||
|
||||
*** The =prot-emacs-langs.el= settings for "electric" behaviour
|
||||
|
|
@ -13031,7 +13031,7 @@ At all times, copy the return value to the `kill-ring'."
|
|||
(display-line-numbers-mode 1))
|
||||
|
||||
;;;###autoload
|
||||
(defun prot-elisp-pp-last-sexp ()
|
||||
(defun prot-elisp-pp-macroexpand-last-sexp ()
|
||||
"Like `pp-macroexpand-last-sexp' but with a generic `display-buffer'.
|
||||
Now use `display-buffer-alist' like the Lisp gods intended."
|
||||
(declare (interactive-only t))
|
||||
|
|
|
|||
|
|
@ -75,7 +75,7 @@ At all times, copy the return value to the `kill-ring'."
|
|||
(display-line-numbers-mode 1))
|
||||
|
||||
;;;###autoload
|
||||
(defun prot-elisp-pp-last-sexp ()
|
||||
(defun prot-elisp-pp-macroexpand-last-sexp ()
|
||||
"Like `pp-macroexpand-last-sexp' but with a generic `display-buffer'.
|
||||
Now use `display-buffer-alist' like the Lisp gods intended."
|
||||
(declare (interactive-only t))
|
||||
|
|
|
|||
Loading…
Reference in a new issue