Function: majutsu-jjdescription--summary-range
majutsu-jjdescription--summary-range is a natively compiled function
defined in majutsu-jjdescription.el.
Signature
(majutsu-jjdescription--summary-range)
Documentation
Return the summary line range as (BEG . END), or nil if missing.
Source Code
;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-jjdescription.el
(defun majutsu-jjdescription--summary-range ()
"Return the summary line range as (BEG . END), or nil if missing."
(save-excursion
(goto-char (point-min))
(let* ((ignore-pos (progn
(majutsu-jjdescription--refresh-ignore-rest-pos)
majutsu-jjdescription--ignore-rest-pos))
(search-end (or ignore-pos (point-max)))
range)
(while (and (not range) (< (point) search-end) (not (eobp)))
(cond
((looking-at-p (rx bol (* (any " \t")) eol)))
((and comment-start-skip
(looking-at-p comment-start-skip)))
(t (setq range (cons (line-beginning-position)
(line-end-position)))))
(forward-line 1))
range)))