diff options
author | Gerd Moellmann <gerd@gnu.org> | 2001-09-12 13:09:39 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2001-09-12 13:09:39 +0000 |
commit | 4c1ac719077ad7839c45ce86bd5f192327f757c9 (patch) | |
tree | 38b7a4c4b69ef16f255e9dd27c6df69a310393e5 /lisp/isearch.el | |
parent | 20276dad28c87e3753bb3f58acd4ed5c36daeeb1 (diff) | |
download | emacs-4c1ac719077ad7839c45ce86bd5f192327f757c9.tar.gz |
(isearch-intersects-p): Fix end checks.
Diffstat (limited to 'lisp/isearch.el')
-rw-r--r-- | lisp/isearch.el | 8 |
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 |