Function: cider-history-target-overlay-at

cider-history-target-overlay-at is a byte-compiled function defined in cider-history.el.

Signature

(cider-history-target-overlay-at POSITION &optional NO-ERROR)

Documentation

Return overlay at POSITION that has property cider-history-target.

POSITION defaults to point. If no such overlay, raise an error unless NO-ERROR is true, in which case return nil.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260822.1520/cider-history.el
(defun cider-history-target-overlay-at (position &optional no-error)
  "Return overlay at POSITION that has property `cider-history-target'.
POSITION defaults to point.
If no such overlay, raise an error unless NO-ERROR is true, in which
case return nil."
  (let ((ovs (overlays-at (or position (point)))))
    (catch 'cider-history-target-overlay-at
      (dolist (ov ovs)
        (when (overlay-get ov 'cider-history-target)
          (throw 'cider-history-target-overlay-at ov)))
      (unless no-error
        (error "No CIDER history item here")))))