Function: hs-overlay-at

hs-overlay-at is a byte-compiled function defined in hideshow.el.gz.

Signature

(hs-overlay-at POSITION)

Documentation

Return hideshow overlay at POSITION, or nil if none to be found.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/hideshow.el.gz
(defun hs-overlay-at (position)
  "Return hideshow overlay at POSITION, or nil if none to be found."
  (let ((overlays (overlays-at position))
        ov found)
    (while (and (not found) (setq ov (car overlays)))
      (setq found (and (overlay-get ov 'hs) ov)
            overlays (cdr overlays)))
    found))