Function: hs--add-indicators

hs--add-indicators is a byte-compiled function defined in hideshow.el.gz.

Signature

(hs--add-indicators &optional BEG END)

Documentation

Add hideable indicators from BEG to END.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/hideshow.el.gz
(defun hs--add-indicators (&optional beg end)
  "Add hideable indicators from BEG to END."
  (setq beg (progn (goto-char beg) (pos-bol))
        end (progn (goto-char end)
                   ;; Include the EOL indicator positions
                   (min (1+ (pos-eol)) (point-max))))
  (goto-char beg)
  (remove-overlays beg end 'hs-indicator t)

  (while (not (>= (point) end))
    (when-let* ((_ (not (invisible-p (point)))) ; Skip invisible lines
                (b-beg (hs-get-first-block-on-line)))
      (hs--make-indicators-overlays b-beg))
    ;; Only 1 indicator per line
    (forward-line))
  `(jit-lock-bounds ,beg . ,end))