# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 1000300179 0
# Node ID cc4b3cf1bfcdc568282b87ad7f856e0f736cf106
# Parent  2ccde3c50b3aa7d4a23af4192e2566d0e5221e93
(isearch-intersects-p): Fix end checks.

diff -r 2ccde3c50b3a -r cc4b3cf1bfcd lisp/isearch.el
--- 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