From: Richard M. Stallman Date: Thu, 25 Aug 2005 11:04:38 +0000 (+0000) Subject: (Finding Overlays): Fix `find-overlay-prop' in `next-overlay-change' example. X-Git-Tag: emacs-pretest-22.0.90~7453 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7fdba7057b6f95da5217c18cd7f9b4c031c2140c;p=emacs.git (Finding Overlays): Fix `find-overlay-prop' in `next-overlay-change' example. --- diff --git a/lispref/display.texi b/lispref/display.texi index d4be7b54cc0..8addb3b67ec 100644 --- a/lispref/display.texi +++ b/lispref/display.texi @@ -1501,20 +1501,26 @@ end of an overlay, before @var{pos}. If there is none, it returns @code{(point-min)}. @end defun - Here's an easy way to use @code{next-overlay-change} to search for the -next character which gets a non-@code{nil} @code{happy} property from + Here's a function which uses @code{next-overlay-change} to search +for the next character which gets a given property @code{prop} from either its overlays or its text properties (@pxref{Property Search}): @smallexample (defun find-overlay-prop (prop) (save-excursion (while (and (not (eobp)) - (not (get-char-property (point) 'happy))) + (not (get-char-property (point) prop))) (goto-char (min (next-overlay-change (point)) - (next-single-property-change (point) 'happy)))) + (next-single-property-change (point) prop)))) (point))) @end smallexample + Now you can search for a @code{happy} property like this: + +@smallexample +(find-overlay-prop 'happy) +@end smallexample + @node Width @section Width