From 66e2e71d556785cd10270931c6fc0424b9dea6a6 Mon Sep 17 00:00:00 2001 From: Dmitry Kurochkin Date: Fri, 27 May 2011 22:14:38 -0300 Subject: [PATCH] * lisp/isearch.el (isearch-range-invisible): Use invisible-p. Fixes: debbugs:8721 --- lisp/ChangeLog | 4 ++++ lisp/isearch.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 29749a7508..fe1f6cdeab 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2011-05-28 Dmitry Kurochkin (tiny change) + + * isearch.el (isearch-range-invisible): Use invisible-p (bug#8721). + 2009-11-23 Toby Cubitt * emacs-lisp/avl-tree.el: New avl-tree-stack datatype. Add new diff --git a/lisp/isearch.el b/lisp/isearch.el index 008cf2ce58..1bb08d1ebb 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -2435,7 +2435,7 @@ update the match data, and return point." ;; skip all characters with that same `invisible' property value. ;; Do that over and over. (while (and (< (point) end) (invisible-p (point))) - (if (get-text-property (point) 'invisible) + (if (invisible-p (get-text-property (point) 'invisible)) (progn (goto-char (next-single-property-change (point) 'invisible nil end)) -- 2.20.1