dotemacs

commit edc686b3eb52155eb4bd7e89a083a60d51831578
parent 98924acedbe5c5eef537c9012bfb2dcdc04d3714
Author: Lukas Henkel <lh@entf.net>
Date:   Sun, 30 Jul 2023 10:15:03 +0200

Stop aggressive-indent from spamming the message area on Emacs 28

Diffstat:
M
init.el
 | 
6
++++++

1 file changed, 6 insertions(+), 0 deletions(-)
diff --git a/init.el b/init.el
@@ -63,6 +63,11 @@
           (diff original-file-name file-name nil t))
       (delete-file file-name))))
 
+(defun lh/indent-region-inhibit-message (start end &optional column)
+  (interactive "r\nP")
+  (let ((inhibit-message t))
+    (indent-region start end column)))
+
 (defmacro lh/global-set-keys (keys-alist)
   `(progn
      ,@(seq-map
@@ -268,6 +273,7 @@
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
+ '(aggressive-indent-region-function 'lh/indent-region-inhibit-message)
  '(all-the-icons-completion-mode t)
  '(auth-sources '(default))
  '(aw-dispatch-always t)