procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix c-ts-common--fill-paragraph for C

Browse source 
This should fix the failing filling test for c-ts-mode.

* lisp/progmodes/c-ts-common.el (c-ts-common--fill-paragraph): Don't
go back to indentation.
This commit is contained in:
Yuan Fu 2024-04-26 19:55:37 -07:00
parent db8f7ed7f6
commit 53333132e4
No known key found for this signature in database
GPG key ID: 56E19BC57664A442
1 changed files with 10 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
lisp/progmodes/c-ts-common.el
View file

@ -123,12 +123,16 @@ ARG is passed to `fill-paragraph'."
(let ((node (treesit-node-at (point))))
(when (string-match-p c-ts-common--comment-regexp
(treesit-node-type node))
(if (save-excursion
(goto-char (treesit-node-start node))
;; In rust, NODE will be the body of a comment excluding
;; the //, so we need to go to BOL to check for //.
(back-to-indentation)
(looking-at "//"))
(if (or (save-excursion
(goto-char (treesit-node-start node))
(looking-at "//"))
;; In rust, NODE will be the body of a comment, and the
;; parent will be the whole comment.
(if-let ((start (treesit-node-start
(treesit-node-parent node))))
(save-excursion
(goto-char start)
(looking-at "//"))))
(fill-comment-paragraph arg)
(c-ts-common--fill-block-comment arg)))
;; Return t so `fill-paragraph' doesn't attempt to fill by