Change apheleia stupid indenting

1 files changed, 25 insertions, 0 deletions

@@ -0,0 +1,25 @@
+;;; acdw-apheleia.el --- bespoke apheleia junk -*- lexical-binding: t -*-
+
+;;; Commentary:
+
+;;; Code:
+
+(require 'apheleia)
+
+(defcustom apheleia-stupid-modes '(makefile-mode
+                                   org-mode)
+  "List of stupid modes to not use `apheleia-global-mode' on."
+  :type '(repeat function)
+  :group 'apheleia)
+
+(defun apheleia-dumb-auto-format ()
+  "Format a buffer dumbly."    
+  ;; If there's no apheleia formatter for the mode, just indent the
+  ;; buffer.
+  (unless (or (apply #'derived-mode-p apheleia-stupid-modes)
+              (and (fboundp 'apheleia--get-formatter-command)
+                   (apheleia--get-formatter-command)))
+    (indent-region (point-min) (point-max))))
+
+(provide 'acdw-apheleia)
+;;; acdw-apheleia ends here