Function: yaml-ts-mode--fill-paragraph

yaml-ts-mode--fill-paragraph is an interactive and byte-compiled function defined in yaml-ts-mode.el.gz.

Signature

(yaml-ts-mode--fill-paragraph &optional JUSTIFY)

Documentation

Fill paragraph.

Behaves like fill-paragraph, but respects block node boundaries. JUSTIFY is passed to fill-paragraph.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/yaml-ts-mode.el.gz
(defun yaml-ts-mode--fill-paragraph (&optional justify)
  "Fill paragraph.
Behaves like `fill-paragraph', but respects block node
boundaries.  JUSTIFY is passed to `fill-paragraph'."
  (interactive "*P")
  (save-restriction
    (widen)
    (let ((node (treesit-node-at (point))))
      (if (member (treesit-node-type node) '("block_scalar" "comment"))
        (let* ((start (treesit-node-start node))
               (end (treesit-node-end node))
               (start-marker (point-marker))
               (fill-paragraph-function nil))
          (save-excursion
            (goto-char start)
            (forward-line)
            (move-marker start-marker (point))
            (narrow-to-region (point) end))
          (fill-region start-marker end justify))
        t))))