diff --git a/lisp/treesit.el b/lisp/treesit.el index c6db9ede968..737f5545a16 100644 --- a/lisp/treesit.el +++ b/lisp/treesit.el @@ -1323,10 +1323,6 @@ omitted, default END to BEG." ;;; Language -;; Defined in treesit.c. This is just to add some default values. -(defvar treesit-languages-require-line-column-tracking - '(haskell)) - ;; The entries are sorted by `sort-lines'. (defvar treesit-language-display-name-alist '( diff --git a/src/treesit.c b/src/treesit.c index 2c6ab6aaa2b..5315c348634 100644 --- a/src/treesit.c +++ b/src/treesit.c @@ -5289,6 +5289,8 @@ syms_of_treesit (void) DEFSYM (Qor, "or"); DEFSYM (Qand, "and"); + DEFSYM (Qhaskell, "haskell"); + #ifdef WINDOWSNT DEFSYM (Qtree_sitter, "tree-sitter"); #endif @@ -5410,7 +5412,7 @@ Most tree-sitter language grammars don't require line and column tracking to work, but some languages do. When creating a parser, if the language is in this list, Emacs enables line-column tracking for the buffer. */); - Vtreesit_languages_require_line_column_tracking = Qnil; + Vtreesit_languages_require_line_column_tracking = list1 (Qhaskell); DEFVAR_LISP ("treesit-major-mode-remap-alist", Vtreesit_major_mode_remap_alist,