diff options
| author | Eli Zaretskii | 2024-09-28 08:09:32 -0400 |
|---|---|---|
| committer | Eli Zaretskii | 2024-09-28 08:09:32 -0400 |
| commit | a8a3f04f8a7330e0d7e238e32715b4088c9e4275 (patch) | |
| tree | 9d68af0874c38b0fa0972f97cb0b2e6719175287 | |
| parent | c90eb98dab09ed4fcb33c1e394a1e0b31f53465e (diff) | |
| parent | e2b01d164cddcfda053334f735e099aef86547da (diff) | |
| download | emacs-a8a3f04f8a7330e0d7e238e32715b4088c9e4275.tar.gz emacs-a8a3f04f8a7330e0d7e238e32715b4088c9e4275.zip | |
Merge from origin/emacs-30
e2b01d164cd ; Fix last changes in php-ts-mode.el
| -rw-r--r-- | lisp/progmodes/php-ts-mode.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/progmodes/php-ts-mode.el b/lisp/progmodes/php-ts-mode.el index 0bc1c51c158..2a8f3455402 100644 --- a/lisp/progmodes/php-ts-mode.el +++ b/lisp/progmodes/php-ts-mode.el | |||
| @@ -77,6 +77,7 @@ | |||
| 77 | (declare-function treesit-parser-included-ranges "treesit.c") | 77 | (declare-function treesit-parser-included-ranges "treesit.c") |
| 78 | (declare-function treesit-parser-list "treesit.c") | 78 | (declare-function treesit-parser-list "treesit.c") |
| 79 | (declare-function treesit-parser-language "treesit.c") | 79 | (declare-function treesit-parser-language "treesit.c") |
| 80 | (declare-function treesit-query-compile "treesit.c") | ||
| 80 | (declare-function treesit-search-forward "treesit.c") | 81 | (declare-function treesit-search-forward "treesit.c") |
| 81 | (declare-function treesit-node-prev-sibling "treesit.c") | 82 | (declare-function treesit-node-prev-sibling "treesit.c") |
| 82 | (declare-function treesit-node-first-child-for-pos "treesit.c") | 83 | (declare-function treesit-node-first-child-for-pos "treesit.c") |
| @@ -774,17 +775,17 @@ characters of the current line." | |||
| 774 | "PHP predefined constant.") | 775 | "PHP predefined constant.") |
| 775 | 776 | ||
| 776 | (defun php-ts-mode--test-namespace-name-as-prefix-p () | 777 | (defun php-ts-mode--test-namespace-name-as-prefix-p () |
| 777 | "Return t if the namespace_name_as_prefix keyword is a namded node, nil otherwise." | 778 | "Return t if namespace_name_as_prefix keyword is a named node, nil otherwise." |
| 778 | (ignore-errors | 779 | (ignore-errors |
| 779 | (progn (treesit-query-compile 'php "(namespace_name_as_prefix)" t) t))) | 780 | (progn (treesit-query-compile 'php "(namespace_name_as_prefix)" t) t))) |
| 780 | 781 | ||
| 781 | (defun php-ts-mode--test-namespace-aliasing-clause-p () | 782 | (defun php-ts-mode--test-namespace-aliasing-clause-p () |
| 782 | "Return t if the namespace_name_as_prefix keyword is a namded node, nil otherwise." | 783 | "Return t if namespace_name_as_prefix keyword is named node, nil otherwise." |
| 783 | (ignore-errors | 784 | (ignore-errors |
| 784 | (progn (treesit-query-compile 'php "(namespace_name_as_prefix)" t) t))) | 785 | (progn (treesit-query-compile 'php "(namespace_name_as_prefix)" t) t))) |
| 785 | 786 | ||
| 786 | (defun php-ts-mode--test-namespace-use-group-clause-p () | 787 | (defun php-ts-mode--test-namespace-use-group-clause-p () |
| 787 | "Return t if the namespace_use_group_clause keyword is a namded node, nil otherwise." | 788 | "Return t if namespace_use_group_clause keyword is named node, nil otherwise." |
| 788 | (ignore-errors | 789 | (ignore-errors |
| 789 | (progn (treesit-query-compile 'php "(namespace_use_group_clause)" t) t))) | 790 | (progn (treesit-query-compile 'php "(namespace_use_group_clause)" t) t))) |
| 790 | 791 | ||