summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/text-property-search.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/text-property-search.el b/lisp/emacs-lisp/text-property-search.el
index cf467cbc258..4d4e391da8d 100644
--- a/lisp/emacs-lisp/text-property-search.el
+++ b/lisp/emacs-lisp/text-property-search.el
@@ -78,6 +78,7 @@ See `text-property-search-forward' for further documentation."
;; backwards when searching backwards. Also adjust the end
;; point to the correct place.
(cl-rotatef (prop-match-beginning match) (prop-match-end match))
+ (setf (prop-match-beginning match) (1+ (prop-match-beginning match)))
(setf (prop-match-end match) (1+ (prop-match-end match))))
match))