diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2023-11-19 11:37:45 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2023-11-19 11:37:45 +0200 |
| commit | e32c57ed4d36c5c0302eeb409f96ce9155b545ea (patch) | |
| tree | 547d20cc4b00fc81a29458df8a1faf20c40c61ef | |
| parent | 3a3202e4a60baafc2c99c692e7b8426e3f9d2d1b (diff) | |
; Fix make-obsolete warnings in treesit.el
* lisp/treesit.el (treesit-text-type-regexp)
(treesit-sentence-type-regexp, treesit--things-around)
(treesit-sexp-type-regexp): Fix obsolescence warnings.
| -rw-r--r-- | lisp/treesit.el | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/lisp/treesit.el b/lisp/treesit.el index 5ee00637ca6..da8226f7d8a 100644 --- a/lisp/treesit.el +++ b/lisp/treesit.el @@ -2034,7 +2034,8 @@ BACKWARD and ALL are the same as in `treesit-search-forward'." (goto-char current-pos))) node)) -(make-obsolete 'treesit-sexp-type-regexp "`treesit-sexp-type-regexp' will be removed in a few months, use `treesit-thing-settings' instead." "30.0.5") +(make-obsolete 'treesit-sexp-type-regexp + "`treesit-sexp-type-regexp' will be removed soon, use `treesit-thing-settings' instead." "30.1") (defvar-local treesit-sexp-type-regexp nil "A regexp that matches the node type of sexp nodes. @@ -2304,7 +2305,8 @@ set, Emacs also looks for definition of defun in (throw 'done nil) (setq arg (if (> arg 0) (1+ arg) (1- arg)))))))) -(make-obsolete 'treesit-text-type-regexp "`treesit-text-type-regexp' will be removed in a few months, use `treesit-thing-settings' instead." "30.0.5") +(make-obsolete 'treesit-text-type-regexp + "`treesit-text-type-regexp' will be removed soon, use `treesit-thing-settings' instead." "30.1") (defvar-local treesit-text-type-regexp "\\`comment\\'" "A regexp that matches the node type of textual nodes. @@ -2315,7 +2317,8 @@ comments and multiline string literals. For example, \"text_block\" in the case of a string. This is used by `prog-fill-reindent-defun' and friends.") -(make-obsolete 'treesit-sentence-type-regexp "`treesit-sentence-type-regexp' will be removed in a few months, use `treesit-thing-settings' instead." "30.0.5") +(make-obsolete 'treesit-sentence-type-regexp + "`treesit-sentence-type-regexp' will be removed soon, use `treesit-thing-settings' instead." "30.1") (defvar-local treesit-sentence-type-regexp nil "A regexp that matches the node type of sentence nodes. @@ -2359,7 +2362,8 @@ the current line if the beginning of the defun is indented." (line-beginning-position)) (beginning-of-line)))) -(make-obsolete 'treesit--things-around "`treesit--things-around' will be removed in a few months, use `treesit--thing-prev', `treesit--thing-next', `treesit--thing-at' instead." "30.0.5") +(make-obsolete 'treesit--things-around + "`treesit--things-around' will be removed soon, use `treesit--thing-prev', `treesit--thing-next', `treesit--thing-at' instead." "30.1") (defun treesit--things-around (pos thing) "Return the previous, next, and parent thing around POS. |