Home Gen393 @ 2024-10-29-00:24
This commit is contained in:
parent
ee12fa6127
commit
1b5b0e952b
@ -197,12 +197,12 @@
|
|||||||
(after! tree-sitter
|
(after! tree-sitter
|
||||||
(add-hook! 'c++-ts-mode-hook #'tree-sitter-mode)
|
(add-hook! 'c++-ts-mode-hook #'tree-sitter-mode)
|
||||||
(add-hook! 'tree-sitter-mode-hook #'tree-sitter-hl-mode)
|
(add-hook! 'tree-sitter-mode-hook #'tree-sitter-hl-mode)
|
||||||
(let ((result))
|
(let (result)
|
||||||
(dolist (mapping (copy-alist tree-sitter-major-mode-language-alist))
|
(dolist (mapping tree-sitter-major-mode-language-alist)
|
||||||
(let* ((pre-mode (car mapping))
|
(let* ((pre-mode (car mapping))
|
||||||
(ts-lang (cdr mapping))
|
(ts-lang (cdr mapping))
|
||||||
(post-mode (cdr (assoc pre-mode mode-ts-mode-mapping))))
|
(post-mode (cdr (assoc pre-mode mode-ts-mode-mapping))))
|
||||||
(when ts-lang
|
(when post-mode
|
||||||
(push (cons post-mode ts-lang) result))))
|
(push (cons post-mode ts-lang) result))))
|
||||||
(add-to-list 'tree-sitter-major-mode-language-alist result)))
|
(add-to-list 'tree-sitter-major-mode-language-alist result)))
|
||||||
|
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user