From: Eli Zaretskii Date: Sat, 28 Sep 2024 12:06:44 +0000 (+0300) Subject: ; Fix last changes in php-ts-mode.el X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=026fc7ed6d11b062035d4aa1e87f9cfd2a11a9c7;p=emacs.git ; Fix last changes in php-ts-mode.el * lisp/progmodes/php-ts-mode.el (php-ts-mode--test-namespace-name-as-prefix-p) (php-ts-mode--test-namespace-aliasing-clause-p) (php-ts-mode--test-namespace-use-group-clause-p): Doc fixes. (treesit-query-compile): Declare. (cherry picked from commit e2b01d164cddcfda053334f735e099aef86547da) --- 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 @@ (declare-function treesit-parser-included-ranges "treesit.c") (declare-function treesit-parser-list "treesit.c") (declare-function treesit-parser-language "treesit.c") +(declare-function treesit-query-compile "treesit.c") (declare-function treesit-search-forward "treesit.c") (declare-function treesit-node-prev-sibling "treesit.c") (declare-function treesit-node-first-child-for-pos "treesit.c") @@ -774,17 +775,17 @@ characters of the current line." "PHP predefined constant.") (defun php-ts-mode--test-namespace-name-as-prefix-p () - "Return t if the namespace_name_as_prefix keyword is a namded node, nil otherwise." + "Return t if namespace_name_as_prefix keyword is a named node, nil otherwise." (ignore-errors (progn (treesit-query-compile 'php "(namespace_name_as_prefix)" t) t))) (defun php-ts-mode--test-namespace-aliasing-clause-p () - "Return t if the namespace_name_as_prefix keyword is a namded node, nil otherwise." + "Return t if namespace_name_as_prefix keyword is named node, nil otherwise." (ignore-errors (progn (treesit-query-compile 'php "(namespace_name_as_prefix)" t) t))) (defun php-ts-mode--test-namespace-use-group-clause-p () - "Return t if the namespace_use_group_clause keyword is a namded node, nil otherwise." + "Return t if namespace_use_group_clause keyword is named node, nil otherwise." (ignore-errors (progn (treesit-query-compile 'php "(namespace_use_group_clause)" t) t)))