awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-09-04 15:03:42 -05:00
Code Issues Packages Projects Releases Wiki Activity

refactor(tree-sitter): major mode remapping

Browse Source 
This approach simplifies the hacks and uses fewer moving parts to be
less error prone (or prone to potentially overwriting user/module
configuration).
This commit is contained in:
Henrik Lissner
2025-08-30 03:01:44 +02:00
parent 3044812ac1
commit 7dcedc16b5
2 changed files with 29 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
modules/tools/tree-sitter/autoload/tree-sitter.el
View File

@@ -1,8 +1,5 @@
;;; tools/tree-sitter/autoload/tree-sitter.el -*- lexical-binding: t; -*-
;;;###autoload
(defvar +tree-sitter--major-mode-remaps-alist nil)
;;;###autodef (fset 'tree-sitter! #'ignore)
(defun tree-sitter! ()
(message "Old tree-sitter.el support is deprecated!"))
@@ -25,9 +22,8 @@ pre-Emacs 31."
(cl-check-type ts-mode symbol)
(setq recipes (mapcar #'ensure-list (ensure-list recipes)))
(dolist (m (ensure-list mode))
(add-to-list
'+tree-sitter--major-mode-remaps-alist
(list m ts-mode (mapcar #'car recipes) nil)))
(setf (alist-get m major-mode-remap-defaults) ts-mode)
(put ts-mode '+tree-sitter (cons m (mapcar #'car recipes))))
(when (setq recipes (cl-remove-if-not #'cdr recipes))
(with-eval-after-load 'treesit
(dolist (recipe recipes)