emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 30f6038: isearch-open-necessary-overlays: Open over


From: Nicolas Richard
Subject: [Emacs-diffs] master 30f6038: isearch-open-necessary-overlays: Open overlay ending at point
Date: Sat, 13 Dec 2014 16:13:58 +0000

branch: master
commit 30f603836c64a045fa59b5258d09b99da582eb75
Author: Nicolas Richard <address@hidden>
Commit: Nicolas Richard <address@hidden>

    isearch-open-necessary-overlays: Open overlay ending at point
    
    * lisp/isearch.el (isearch-open-necessary-overlays): Open overlay
    ending at point (bug#19333).
---
 lisp/ChangeLog  |    5 +++++
 lisp/isearch.el |    2 +-
 2 files changed, 6 insertions(+), 1 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7ec7feb..27337e9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-12-05  Nicolas Richard  <address@hidden>
+
+       * isearch.el (isearch-open-necessary-overlays): Open overlay
+       ending at point (bug#19333).
+
 2014-12-13  Lars Magne Ingebrigtsen  <address@hidden>
 
        * net/shr.el (shr-fold-text): New function.
diff --git a/lisp/isearch.el b/lisp/isearch.el
index c3e473a..ef0c4a7 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)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]