aboutsummaryrefslogtreecommitdiffstats
path: root/admin
diff options
context:
space:
mode:
Diffstat (limited to 'admin')
-rw-r--r--admin/tree-sitter/treesit-admin.el8
1 files changed, 2 insertions, 6 deletions
diff --git a/admin/tree-sitter/treesit-admin.el b/admin/tree-sitter/treesit-admin.el
index ef6d256a538..f41c4592039 100644
--- a/admin/tree-sitter/treesit-admin.el
+++ b/admin/tree-sitter/treesit-admin.el
@@ -156,9 +156,7 @@ queries that has problems with latest grammar."
156 (unless (memq language (alist-get mode mode-language-alist)) 156 (unless (memq language (alist-get mode mode-language-alist))
157 (push language (alist-get mode mode-language-alist))) 157 (push language (alist-get mode mode-language-alist)))
158 ;; Validate query. 158 ;; Validate query.
159 (when (not (ignore-errors 159 (unless (treesit-query-valid-p language query)
160 (treesit-query-compile language query t)
161 t))
162 (push (list mode language feature) invalid-feature-list) 160 (push (list mode language feature) invalid-feature-list)
163 (setq all-queries-valid nil)))) 161 (setq all-queries-valid nil))))
164 (when all-queries-valid 162 (when all-queries-valid
@@ -261,9 +259,7 @@ Return non-nil if all queries are valid, nil otherwise."
261 (language (treesit-query-language query))) 259 (language (treesit-query-language query)))
262 ;; Validate query. 260 ;; Validate query.
263 (when (and (eq lang language) 261 (when (and (eq lang language)
264 (not (ignore-errors 262 (not (treesit-query-valid-p language query)))
265 (treesit-query-compile language query t)
266 t)))
267 (setq all-queries-valid nil)))) 263 (setq all-queries-valid nil))))
268 all-queries-valid)) 264 all-queries-valid))
269 265