diff options
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 12 |
1 files changed, 5 insertions, 7 deletions
| diff --git a/init.el b/init.el index b8523e2..d2a8960 100644 --- a/init.el +++ b/init.el | |||
| @@ -846,13 +846,11 @@ if ripgrep is installed, otherwise `consult-grep'." | |||
| 846 | (defun acdw/eval-region-or-buffer () | 846 | (defun acdw/eval-region-or-buffer () |
| 847 | (interactive) | 847 | (interactive) |
| 848 | (if (region-active-p) | 848 | (if (region-active-p) |
| 849 | (progn | 849 | (with-message (format "Evaluating %S -> %S" |
| 850 | (message "Evaluating %S -> %S..." (region-beginning) (region-end)) | 850 | (region-beginning) (region-end)) |
| 851 | (eval-region (region-beginning) (region-end)) | 851 | (eval-region (region-beginning) (region-end))) |
| 852 | (message "Evaluating %S -> %S... Done." (region-beginning) (region-end))) | 852 | (with-message "Evaluating buffer" |
| 853 | (message "%s" "Evaluating buffer...") | 853 | (eval-buffer)))) |
| 854 | (eval-buffer) | ||
| 855 | (message "%s" "Evaluating buffer... Done."))) | ||
| 856 | 854 | ||
| 857 | (:with-map emacs-lisp-mode-map | 855 | (:with-map emacs-lisp-mode-map |
| 858 | (:bind "C-c C-c" acdw/eval-region-or-buffer | 856 | (:bind "C-c C-c" acdw/eval-region-or-buffer |