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 |