summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2001-09-12 13:09:39 +0000
committerGerd Moellmann <gerd@gnu.org>2001-09-12 13:09:39 +0000
commit4c1ac719077ad7839c45ce86bd5f192327f757c9 (patch)
tree38b7a4c4b69ef16f255e9dd27c6df69a310393e5
parent20276dad28c87e3753bb3f58acd4ed5c36daeeb1 (diff)
downloademacs-4c1ac719077ad7839c45ce86bd5f192327f757c9.tar.gz
(isearch-intersects-p): Fix end checks.
-rw-r--r--lisp/isearch.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el
index a125f7ab053..2c687abee42 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1683,10 +1683,10 @@ If there is no completion possible, say so and continue searching."
(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