From 8191a92a8ccb9e10d231d4b6db7741de74fb15bf Mon Sep 17 00:00:00 2001 From: Alexander Rosenberg Date: Sun, 2 Nov 2025 01:42:50 -0700 Subject: [PATCH] Change auto-format for lisp files --- init.el | 16 +++++++++++++--- 1 file changed, 13 insertions(+), 3 deletions(-) diff --git a/init.el b/init.el index 4df0a4a..68c0c1d 100644 --- a/init.el +++ b/init.el @@ -734,9 +734,7 @@ With NO-EWW, don't update eww's state." (evil-cleverparens-mode . paredit-mode)) :bind (:map paredit-mode-map ("C-" . paredit-RET) - ("C-RET" . paredit-RET) - :map evil-cleverparens-mode-map - ("C-c o" . evil-cp-open-below-form)) + ("C-RET" . paredit-RET)) :custom (evil-cleverparens-use-s-and-S nil) (evil-cleverparens-complete-parens-in-yanked-region t) @@ -2184,6 +2182,18 @@ line in the block and manually deal with indentation." (advice-add 'calculate-lisp-indent :around 'my/-calculate-lisp-indent-noindent-comment) +;; common lisp +(use-package lisp-mode + :ensure nil + :hook (lisp-mode . my/-format-only-when-sly-running) + :init + (defun my/-apheleia-sly-skip-function () + (or (not (featurep 'sly)) + (not sly-mode) + (not (sly-connected-p)))) + (defun my/-format-only-when-sly-running () + "Make apheleia-mode format lisp buffers only when sly is running." + (add-to-list 'apheleia-skip-functions #'my/-apheleia-sly-skip-function))) ;; sly (use-package sly ;; :hook (lisp-mode . my/-lisp-mode-autoconnect-sly)