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

Fix 'fill-paragraph' in 'yaml-ts-mode'

Browse source 
* lisp/textmodes/yaml-ts-mode.el (yaml-ts-mode--fill-paragraph):
Avoid 'fill-paragraph' when outside of block_scalar or comment
nodes.  (Bug#68781)
This commit is contained in:
Graham Marlow 2024-01-29 17:16:04 -08:00 • committed by Eli Zaretskii
parent ff63da26b6
commit 4adb4b2ac5
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/textmodes/yaml-ts-mode.el
View file

@ -128,7 +128,7 @@ boundaries. JUSTIFY is passed to `fill-paragraph'."
(save-restriction
(widen)
(let ((node (treesit-node-at (point))))
(when (string= "block_scalar" (treesit-node-type node))
(if (member (treesit-node-type node) '("block_scalar" "comment"))
(let* ((start (treesit-node-start node))
(end (treesit-node-end node))
(start-marker (point-marker))
@ -138,7 +138,8 @@ boundaries. JUSTIFY is passed to `fill-paragraph'."
(forward-line)
(move-marker start-marker (point))
(narrow-to-region (point) end))
(fill-region start-marker end justify))))))
(fill-region start-marker end justify))
t))))
;;;###autoload
(define-derived-mode yaml-ts-mode text-mode "YAML"