diff --git a/lisp/progmodes/elixir-ts-mode.el b/lisp/progmodes/elixir-ts-mode.el index 52744f194a2..7edf42c2489 100644 --- a/lisp/progmodes/elixir-ts-mode.el +++ b/lisp/progmodes/elixir-ts-mode.el @@ -590,10 +590,12 @@ (defvar elixir-ts--thing-settings `((sexp (not (or (and named - ,(rx bos (or "source" "comment") eos)) + ,(rx bos (or "source" "keywords" "comment") + eos)) (and anonymous - ,(rx (or "{" "}" "[" "]" "(" ")" - "do" "end")))))) + ,(rx bos (or "{" "}" "[" "]" "(" ")" "," + "do" "end") + eos))))) (list (or (and "\\`arguments\\'" ,#'elixir-ts--with-parens-0-p) (and "\\`unary_operator\\'" ,#'elixir-ts--with-parens-1-p) diff --git a/lisp/progmodes/ruby-ts-mode.el b/lisp/progmodes/ruby-ts-mode.el index 53fefe068b2..0ab9f30d70d 100644 --- a/lisp/progmodes/ruby-ts-mode.el +++ b/lisp/progmodes/ruby-ts-mode.el @@ -1179,11 +1179,12 @@ leading double colon is not added." "then") eos)) (and anonymous - ,(rx (or "do" "begin" - "if" "unless" - "def" "end" - "(" ")" "[" "]" - "{" "}" "|" "," ";")))))) + ,(rx bos (or "do" "begin" + "if" "unless" + "def" "end" + "(" ")" "[" "]" + "{" "}" "|" "," ";") + eos))))) (list ,(cons (rx bos (or diff --git a/test/lisp/progmodes/heex-ts-mode-tests.el b/test/lisp/progmodes/heex-ts-mode-tests.el index 01c7ed0fcf1..816d4dd7158 100644 --- a/test/lisp/progmodes/heex-ts-mode-tests.el +++ b/test/lisp/progmodes/heex-ts-mode-tests.el @@ -24,7 +24,7 @@ (require 'treesit) (ert-deftest heex-ts-mode-test-indentation () - (skip-unless (treesit-ready-p 'heex)) + (skip-unless (and (treesit-ready-p 'heex) (treesit-ready-p 'elixir))) (ert-test-erts-file (ert-resource-file "indent.erts"))) (provide 'heex-ts-mode-tests)