2 files changed, 26 insertions, 0 deletions

@@ -567,6 +567,16 @@
     [remap isearch-query-replace] #'anzu-isearch-query-replace
     [remap isearch-query-replace-regexp] #'anzu-isearch-query-replace-regexp))
 
+(setup (:straight-when (apheleia
+                        :host github :repo "raxod502/apheleia")
+         (executable-find "diff"))
+  (:require apheleia
+            +apheleia)
+  (setf (alist-get 'indent-region apheleia-formatters) #'+apheleia-indent-region
+        (alist-get 'emacs-lisp-mode apheleia-mode-alist) 'indent-region
+        (alist-get 'lisp-interaction-mode apheleia-mode-alist) 'indent-region)
+  (apheleia-global-mode +1))
+
 (setup (:straight avy)
   (:require avy +avy)
   (:+key "M-j" #'avy-goto-char-timer)
@@ -0,0 +1,16 @@
+;;; +apheleia.el -*- lexical-binding: t; -*-
+
+;;; Code:
+
+;; https://github.com/raxod502/apheleia/pull/63#issue-1077529623
+(defun +apheleia-indent-region (orig scratch callback _error)
+  (with-current-buffer scratch
+    (setq-local indent-line-function
+                (buffer-local-value 'indent-line-function orig))
+    (indent-region (point-min)
+(point-max))
+    (funcall callback)))
+
+(provide '+apheleia)
+;;; +apheleia.el ends here
+ 
\ No newline at end of file