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

* lisp/isearch.el (isearch-open-necessary-overlays): Open overlay
ending at point (bug#19333).

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7ec7feb2b84..27337e9ab0a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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.
diff --git a/lisp/isearch.el b/lisp/isearch.el
index c3e473a2ba6..ef0c4a78b89 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -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)))