commit edc686b3eb52155eb4bd7e89a083a60d51831578
from: Lukas Henkel <lh@entf.net>
date: Sun Jul 30 08:15:03 2023 UTC

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

commit - 98924acedbe5c5eef537c9012bfb2dcdc04d3714
commit + edc686b3eb52155eb4bd7e89a083a60d51831578
blob - 9ce65c478be265b9898db4e2f91ccadbace27b67
blob + 6b4ba0e44deae86e8143032f6455fd847073f902
--- init.el
+++ init.el
@@ -62,6 +62,11 @@
             (set-visited-file-name original-file-name))
           (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
@@ -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)