]> git.eshelyaron.com Git - emacs.git/commitdiff
Make mhtml-ts-mode--treesit-indent-rules a function
authorYuan Fu <casouri@gmail.com>
Mon, 17 Feb 2025 21:18:15 +0000 (13:18 -0800)
committerEshel Yaron <me@eshelyaron.com>
Tue, 18 Feb 2025 08:54:10 +0000 (09:54 +0100)
* lisp/textmodes/mhtml-ts-mode.el:
(mhtml-ts-mode--treesit-indent-rules): Turn into a function.
(mhtml-ts-mode): Update accordingly.

(cherry picked from commit 77c7ba7facf6e7ee65e74aba71ce67723ba14ff7)

lisp/textmodes/mhtml-ts-mode.el

index bdb016d67dccb1fe4b69410adc1f0c39e05ff6ec..0d53176f166112b8fe64397c900dea0c40a8e79f 100644 (file)
@@ -315,7 +315,10 @@ NODE and PARENT are ignored."
      (defun ,(regexp-opt (list css--treesit-defun-type-regexp)))))
   "Settings for `treesit-thing-settings'.")
 
-(defvar mhtml-ts-mode--treesit-indent-rules
+;; We use a function instead of a variable, because doesn't exist when
+;; at compile time (unless we `eval-when-compile').
+(defun mhtml-ts-mode--treesit-indent-rules ()
+  "Return intent rules for `mhtml-ts-mode'."
   (treesit--indent-rules-optimize
    (append html-ts-mode--indent-rules
            ;; Extended rules for js and css, to
@@ -535,7 +538,8 @@ Powered by tree-sitter."
     ;; `mhtml-ts-mode-tag-relative-indent' and can be used to indent
     ;; JavaScript and CSS code relative to the HTML that contains them,
     ;; just like in mhtml-mode.
-    (setq-local treesit-simple-indent-rules mhtml-ts-mode--treesit-indent-rules)
+    (setq-local treesit-simple-indent-rules
+                (mhtml-ts-mode--treesit-indent-rules))
 
     ;; Navigation.