isearch-open-necessary-overlays: Open overlay ending at point

* lisp/isearch.el (isearch-open-necessary-overlays): Open overlay
ending at point (bug#19333).
This commit is contained in:
Nicolas Richard 2014-12-13 16:54:14 +01:00
parent 05beff88de
commit 30f603836c
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2014-12-05 Nicolas Richard <theonewiththeevillook@yahoo.fr>
* isearch.el (isearch-open-necessary-overlays): Open overlay
ending at point (bug#19333).
2014-12-13 Lars Magne Ingebrigtsen <larsi@gnus.org>
* net/shr.el (shr-fold-text): New function.

View file

@ -2734,7 +2734,7 @@ update the match data, and return point."
;; in any of these overlays, se we are safe in this case too.
(defun isearch-open-necessary-overlays (ov)
(let ((inside-overlay (and (> (point) (overlay-start ov))
(< (point) (overlay-end ov))))
(<= (point) (overlay-end ov))))
;; If this exists it means that the overlay was opened using
;; this function, not by us tweaking the overlay properties.
(fct-temp (overlay-get ov 'isearch-open-invisible-temporary)))