Function: majutsu-jjdescription--extend-region-summary-line

majutsu-jjdescription--extend-region-summary-line is a natively compiled function defined in majutsu-jjdescription.el.

Signature

(majutsu-jjdescription--extend-region-summary-line)

Documentation

Extend region so the summary line gets refontified.

Added to font-lock-extend-region-functions.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-jjdescription.el
(defun majutsu-jjdescription--extend-region-summary-line ()
  "Extend region so the summary line gets refontified.
Added to `font-lock-extend-region-functions'."
  (save-excursion
    (save-match-data
      (majutsu-jjdescription--refresh-summary-range)
      (let ((ranges (delq nil (list majutsu-jjdescription--summary-range
                                    majutsu-jjdescription--summary-last-range))))
        (when ranges
          (let* ((buffer-beg (point-min))
                 (buffer-end (point-max))
                 (summary-beg
                  (max buffer-beg
                       (min buffer-end (apply #'min (mapcar #'car ranges)))))
                 (summary-end
                  (max summary-beg
                       (min buffer-end (apply #'max (mapcar #'cdr ranges))))))
            (when (or (< summary-beg font-lock-beg summary-end)
                      (< summary-beg font-lock-end summary-end))
              (setq font-lock-beg (min font-lock-beg summary-beg))
              (setq font-lock-end (max font-lock-end summary-end)))))))))