diff options
| author | Yuan Fu <casouri@gmail.com> | 2022-05-07 01:57:39 -0700 |
|---|---|---|
| committer | Yuan Fu <casouri@gmail.com> | 2022-05-07 01:57:39 -0700 |
| commit | 82d5e902af68695481b8809e511a7913ef9a75aa (patch) | |
| tree | e6a366278590e8906a9282d04e48de2061b6fe3f /lisp/emacs-lisp/text-property-search.el | |
| parent | 84847cad82e3b667c82f411627cd58d236f55e84 (diff) | |
| parent | 293a97d61e1977440f96b7fc91f281a06250ea72 (diff) | |
| download | emacs-82d5e902af68695481b8809e511a7913ef9a75aa.tar.gz emacs-82d5e902af68695481b8809e511a7913ef9a75aa.tar.bz2 emacs-82d5e902af68695481b8809e511a7913ef9a75aa.zip | |
; Merge from master.
Diffstat (limited to 'lisp/emacs-lisp/text-property-search.el')
| -rw-r--r-- | lisp/emacs-lisp/text-property-search.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/text-property-search.el b/lisp/emacs-lisp/text-property-search.el index 9f86a28eb64..d11980f4f45 100644 --- a/lisp/emacs-lisp/text-property-search.el +++ b/lisp/emacs-lisp/text-property-search.el @@ -47,7 +47,7 @@ match if is not `equal' to VALUE. Furthermore, a nil PREDICATE means that the match region is ended if the value changes. For instance, this means that if you loop with - (while (setq prop (text-property-search-forward 'face)) + (while (setq prop (text-property-search-forward \\='face)) ...) you will get all distinct regions with non-nil `face' values in @@ -166,7 +166,6 @@ and if a matching region is found, place point at the start of the region." (let ((origin (point)) (ended nil) pos) - (forward-char -1) ;; Find the previous candidate. (while (not ended) (setq pos (previous-single-property-change (point) property)) |