aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorYuan Fu2025-02-17 13:18:15 -0800
committerYuan Fu2025-02-17 13:38:14 -0800
commit77c7ba7facf6e7ee65e74aba71ce67723ba14ff7 (patch)
tree74fac3a6d251e0aae1f66f6f7ca534ad3ca5d245
parent15d2fc6498db433131bd4364aae1d508a12bd925 (diff)
downloademacs-77c7ba7facf6e7ee65e74aba71ce67723ba14ff7.tar.gz
emacs-77c7ba7facf6e7ee65e74aba71ce67723ba14ff7.zip
Make mhtml-ts-mode--treesit-indent-rules a function
* lisp/textmodes/mhtml-ts-mode.el: (mhtml-ts-mode--treesit-indent-rules): Turn into a function. (mhtml-ts-mode): Update accordingly.
-rw-r--r--lisp/textmodes/mhtml-ts-mode.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/textmodes/mhtml-ts-mode.el b/lisp/textmodes/mhtml-ts-mode.el
index bdb016d67dc..0d53176f166 100644
--- a/lisp/textmodes/mhtml-ts-mode.el
+++ b/lisp/textmodes/mhtml-ts-mode.el
@@ -315,7 +315,10 @@ NODE and PARENT are ignored."
315 (defun ,(regexp-opt (list css--treesit-defun-type-regexp))))) 315 (defun ,(regexp-opt (list css--treesit-defun-type-regexp)))))
316 "Settings for `treesit-thing-settings'.") 316 "Settings for `treesit-thing-settings'.")
317 317
318(defvar mhtml-ts-mode--treesit-indent-rules 318;; We use a function instead of a variable, because doesn't exist when
319;; at compile time (unless we `eval-when-compile').
320(defun mhtml-ts-mode--treesit-indent-rules ()
321 "Return intent rules for `mhtml-ts-mode'."
319 (treesit--indent-rules-optimize 322 (treesit--indent-rules-optimize
320 (append html-ts-mode--indent-rules 323 (append html-ts-mode--indent-rules
321 ;; Extended rules for js and css, to 324 ;; Extended rules for js and css, to
@@ -535,7 +538,8 @@ Powered by tree-sitter."
535 ;; `mhtml-ts-mode-tag-relative-indent' and can be used to indent 538 ;; `mhtml-ts-mode-tag-relative-indent' and can be used to indent
536 ;; JavaScript and CSS code relative to the HTML that contains them, 539 ;; JavaScript and CSS code relative to the HTML that contains them,
537 ;; just like in mhtml-mode. 540 ;; just like in mhtml-mode.
538 (setq-local treesit-simple-indent-rules mhtml-ts-mode--treesit-indent-rules) 541 (setq-local treesit-simple-indent-rules
542 (mhtml-ts-mode--treesit-indent-rules))
539 543
540 ;; Navigation. 544 ;; Navigation.
541 545