diff options
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/tree-sitter/treesit-admin.el | 8 |
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 | ||