Mercurial > emacs

changeset 39256:cc4b3cf1bfcd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(isearch-intersects-p): Fix end checks.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 12 Sep 2001 13:09:39 +0000
parents 2ccde3c50b3a
children e5bb9e09ac4d
files lisp/isearch.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/isearch.el	Wed Sep 12 13:08:29 2001 +0000
+++ b/lisp/isearch.el	Wed Sep 12 13:09:39 2001 +0000
@@ -1683,10 +1683,10 @@
 
 (defun isearch-intersects-p (start0 end0 start1 end1)
   "Return t if regions START0..END0 and START1..END1 intersect."
-  (or (and (>= start0 start1) (< start0 end1))
-      (and (>= end0 start1)   (< end0 end1))
-      (and (>= start1 start0) (< start1 end0))
-      (and (>= end1 start0)   (< end1 end0))))
+  (or (and (>= start0 start1) (<  start0 end1))
+      (and (>  end0 start1)   (<= end0 end1))
+      (and (>= start1 start0) (<  start1 end0))
+      (and (>  end1 start0)   (<= end1 end0))))
 
 
 ;;; Verify if the current match is outside of each element of