Home Gen393 @ 2024-10-29-00:24

This commit is contained in:
Jonas Röger 2024-10-29 00:24:37 +01:00
parent ee12fa6127
commit 1b5b0e952b

View File

@ -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)))