built-in treesit config

init.el

@@ -106,6 +106,7 @@ If freezing sometimes, decrease it. If stuttering, increase it.")
 
 
 (require 'init-built-in)
+(require 'init-treesit)
 (require 'init-modeline)
 (require 'init-git)
 (require 'init-awesome-pair)

lisp/init-eglot.el

@@ -16,7 +16,7 @@
 
 
 ;; json mode is derived from `js-mode', but json file don't need `eglot'
-(add-hook 'js-mode-hook
+(add-hook 'js-base-mode-hook
           (lambda ()
             (unless (derived-mode-p 'js-json-mode 'json-mode)
               (eglot-ensure))))

lisp/init-prettier.el

@@ -22,7 +22,7 @@
                '(js-json-mode . creature/prettier-json-parser)))
 
 (dolist (hook '(css-mode-hook
-                js-mode-hook
+                js-base-mode-hook
                 typescript-mode-hook
                 typescript-ts-base-mode-hook))
   (add-hook hook #'prettier-mode))

lisp/init-treesit.el

@@ -0,0 +1,14 @@
+;; -*- coding: utf-8; lexical-binding: t; -*-
+
+(defconst creature/treesit-available
+  (and (fboundp 'treesit-available-p) (treesit-available-p))
+  "Built-in `treesit' available.")
+
+(when (and (fboundp 'treesit-available-p) (treesit-available-p))
+  (unless (featurep 'treesit) (require 'treesit))
+  (when (treesit-ready-p 'javascript)
+    (add-to-list 'major-mode-remap-alist '(js-mode . js-ts-mode))
+    (add-to-list 'major-mode-remap-alist '(javascript-mode . js-ts-mode))))
+
+
+(provide 'init-treesit)

lisp/init-typescript.el

@@ -1,6 +1,12 @@
 ;; -*- coding: utf-8; lexical-binding: t; -*-
 
-(unless (and (fboundp 'treesit-available-p) (treesit-available-p))
+(if (bound-and-true-p creature/treesit-available)
+    (progn
+      (if (treesit-ready-p 'typescript)
+          (add-to-list 'auto-mode-alist '("\\.ts\\'" . typescript-ts-mode)))
+      (if (treesit-ready-p 'tsx)
+          (add-to-list 'auto-mode-alist '("\\.tsx\\'" . tsx-ts-mode))))
+
   (add-subdirs-to-load-path (expand-file-name "optional-pkg" creature/config-dir))
   (require 'typescript-mode)
 
@@ -22,6 +28,4 @@
     (add-to-list 'tree-sitter-major-mode-language-alist '(typescript-tsx-mode . tsx))))
 
 
-
-
 (provide 'init-typescript)