1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-12 16:23:57 +00:00

(Finding Overlays): Fix example code.

This commit is contained in:
Gerd Moellmann 2001-04-03 14:28:29 +00:00
parent d565f6aa3f
commit 86b032fa4c

View File

@ -1065,7 +1065,7 @@ overlays that specify property @var{prop} for the character at point:
(let ((overlays (overlays-at (point)))
found)
(while overlays
(let ((overlay (cdr overlays)))
(let ((overlay (car overlays)))
(if (overlay-get overlay prop)
(setq found (cons overlay found))))
(setq overlays (cdr overlays)))