From: Yuan Fu <casouri@gmail.com>
Date: Tue, 10 Jan 2023 05:46:07 +0000 (-0800)
Subject: Fix c-ts-mode comment indent
X-Git-Tag: emacs-29.0.90~772
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=55aabfea4accd04aed9424b5cdbe304d12be6224;p=emacs.git

Fix c-ts-mode comment indent

* lisp/progmodes/c-ts-mode.el:
(c-ts-mode--comment-2nd-line-matcher): Also make sure PARENT is a
comment node.
---

diff --git a/lisp/progmodes/c-ts-mode.el b/lisp/progmodes/c-ts-mode.el
index 898b89b9fce..5c7df4b2141 100644
--- a/lisp/progmodes/c-ts-mode.el
+++ b/lisp/progmodes/c-ts-mode.el
@@ -246,10 +246,11 @@ Assumes PARENT is a comment node."
 (defun c-ts-mode--comment-2nd-line-matcher (_n parent &rest _)
   "Matches if point is at the second line of a block comment.
 PARENT should be a comment node."
-  (save-excursion
-    (forward-line -1)
-    (back-to-indentation)
-    (eq (point) (treesit-node-start parent))))
+  (and (equal (treesit-node-type parent) "comment")
+       (save-excursion
+         (forward-line -1)
+         (back-to-indentation)
+         (eq (point) (treesit-node-start parent)))))
 
 (defun c-ts-mode--comment-2nd-line-anchor (&rest _)
   "Return appropriate anchor for the second line of a comment.