dimitri/emacs.d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Replace format-all with apheleia

Browse source
This commit is contained in:
Dimitri Lozeve 2023-12-23 22:58:26 +01:00
parent d237888aa4
commit 7f4888677e
1 changed files with 11 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

19
init.el
View file

@ -195,7 +195,7 @@
:straight t :straight t
:bind :bind
(("C-;" . embark-act) ;; pick some comfortable binding (("C-;" . embark-act) ;; pick some comfortable binding
;("M-;" . embark-dwim) ;;("M-;" . embark-dwim)
("C-h B" . embark-bindings)) ;; alternative for `describe-bindings' ("C-h B" . embark-bindings)) ;; alternative for `describe-bindings'
:init :init
;; Optionally replace the key help with a completing-read interface ;; Optionally replace the key help with a completing-read interface
@ -391,9 +391,7 @@
:after (org) :after (org)
:config :config
(setq org-mime-export-options (setq org-mime-export-options
'(:section-numbers nil '(:section-numbers nil :with-author nil :with-toc nil))
:with-author nil
:with-toc nil))
(setq org-mime-export-ascii 'utf-8) (setq org-mime-export-ascii 'utf-8)
(add-hook 'org-mime-html-hook (add-hook 'org-mime-html-hook
(lambda () (lambda ()
@ -652,9 +650,14 @@
:config :config
(add-hook 'eglot-managed-mode-hook #'eldoc-box-hover-mode t)) (add-hook 'eglot-managed-mode-hook #'eldoc-box-hover-mode t))
(use-package format-all (use-package apheleia
:straight t :straight t
:bind ("C-c C-f" . format-all-buffer)) :config
(apheleia-global-mode +1)
(setf (alist-get 'python-ts-mode apheleia-mode-alist)
'(ruff))
(setf (alist-get 'python-mode apheleia-mode-alist)
'(ruff)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Programming languages modes ;;; Programming languages modes
@ -737,7 +740,7 @@
;; which is annoying when backspacing over a '(' ;; which is annoying when backspacing over a '('
(defun override-slime-repl-bindings-with-paredit () (defun override-slime-repl-bindings-with-paredit ()
(define-key slime-repl-mode-map (define-key slime-repl-mode-map
(read-kbd-macro paredit-backward-delete-key) nil)) (read-kbd-macro paredit-backward-delete-key) nil))
(add-hook 'slime-repl-mode-hook 'override-slime-repl-bindings-with-paredit) (add-hook 'slime-repl-mode-hook 'override-slime-repl-bindings-with-paredit)
(setq lisp-indent-function 'lisp-indent-function) (setq lisp-indent-function 'lisp-indent-function)
;; Use the offline hyperspec from the "clhs" quicklisp package: ;; Use the offline hyperspec from the "clhs" quicklisp package:
@ -763,7 +766,7 @@
("\\.pkg\\'" . gerbil-mode)) ("\\.pkg\\'" . gerbil-mode))
:init :init
(if (eq system-type 'darwin) (if (eq system-type 'darwin)
(add-to-list 'load-path "/opt/homebrew/opt/gerbil-scheme/share/emacs/site-lisp") (add-to-list 'load-path "/opt/homebrew/opt/gerbil-scheme/share/emacs/site-lisp")
(add-to-list 'load-path "/opt/gerbil/share/emacs/site-lisp")) (add-to-list 'load-path "/opt/gerbil/share/emacs/site-lisp"))
(require 'gambit) (require 'gambit)
(autoload 'gerbil-mode "gerbil-mode" "Gerbil editing mode." t) (autoload 'gerbil-mode "gerbil-mode" "Gerbil editing mode." t)