diff options
| author | Case Duckworth | 2021-04-14 18:40:05 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-04-14 18:40:05 -0500 |
| commit | f2dd261315e92bf7869febdf2d6652ddca0ad212 (patch) | |
| tree | ef0b1c3d1da92d5049bb7fdb5f063dbc2e31def4 /init.el | |
| parent | Change (insert "\n\n") -> (newline) (diff) | |
| download | emacs-f2dd261315e92bf7869febdf2d6652ddca0ad212.tar.gz emacs-f2dd261315e92bf7869febdf2d6652ddca0ad212.zip | |
Remove some modes from dumb-format
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 11 |
1 files changed, 7 insertions, 4 deletions
| diff --git a/init.el b/init.el index a46c475..e7bdd37 100644 --- a/init.el +++ b/init.el | |||
| @@ -719,8 +719,11 @@ if ripgrep is installed, otherwise `consult-grep'." | |||
| 719 | 719 | ||
| 720 | ;; Use a dumb formatter on modes that `apheleia' doesn't work for. | 720 | ;; Use a dumb formatter on modes that `apheleia' doesn't work for. |
| 721 | (hook-defun dumb-auto-format before-save-hook | 721 | (hook-defun dumb-auto-format before-save-hook |
| 722 | (unless (and (fboundp 'apheleia--get-formatter-command) | 722 | (setq stupid-modes '(makefile-mode)) |
| 723 | (apheleia--get-formatter-command)) | 723 | ;; If there's no apheleia formatter for the mode, just indent the buffer. |
| 724 | (unless (or (apply #'derived-mode-p stupid-modes) | ||
| 725 | (and (fboundp 'apheleia--get-formatter-command) | ||
| 726 | (apheleia--get-formatter-command))) | ||
| 724 | (indent-region (point-min) (point-max))))) | 727 | (indent-region (point-min) (point-max))))) |
| 725 | 728 | ||
| 726 | (setup (:straight company) | 729 | (setup (:straight company) |
| @@ -785,8 +788,8 @@ if ripgrep is installed, otherwise `consult-grep'." | |||
| 785 | 788 | ||
| 786 | (setup (:straight geiser)) | 789 | (setup (:straight geiser)) |
| 787 | 790 | ||
| 788 | (when-let (lisp-bin (or (executable-find "clisp") | 791 | (when-let (lisp-bin (or (executable-find "sbcl") |
| 789 | (executable-find "sbcl"))) | 792 | (executable-find "clisp"))) |
| 790 | (setup (:straight slime) | 793 | (setup (:straight slime) |
| 791 | (require 'slime-autoloads) | 794 | (require 'slime-autoloads) |
| 792 | (:option inferior-lisp-program lisp-bin) | 795 | (:option inferior-lisp-program lisp-bin) |