Function: eca-chat--image-overlay-at-point

eca-chat--image-overlay-at-point is a natively compiled function defined in eca-chat-image.el.

Signature

(eca-chat--image-overlay-at-point)

Documentation

Return the inline-image overlay at point, or nil.

Looks at overlays at point, then at the position just before point
(so point right after an image still finds it), then any image
overlay on the current line. Filters by eca-chat-image.

Source Code

;; Defined in /nix/store/jklqzw6pzz6j4jrbv8wy0iwgi7jlrbld-emacs-packages-deps/share/emacs/site-lisp/elpa/eca-20260928.1827/eca-chat-image.el
;;;; Save to disk

(defun eca-chat--image-overlay-at-point ()
  "Return the inline-image overlay at point, or nil.
Looks at overlays at point, then at the position just before point
\(so point right after an image still finds it), then any image
overlay on the current line.  Filters by `eca-chat-image'."
  (cl-flet ((image-ov (ovs) (seq-find (lambda (ov)
                                        (overlay-get ov 'eca-chat-image))
                                      ovs)))
    (or (image-ov (overlays-at (point)))
        (image-ov (overlays-at (max (point-min) (1- (point)))))
        (image-ov (overlays-in (line-beginning-position)
                               (line-end-position))))))