diff --git a/src/ext/isearch.lisp b/src/ext/isearch.lisp
index a4e92334e..09ed6f192 100644
--- a/src/ext/isearch.lisp
+++ b/src/ext/isearch.lisp
@@ -443,7 +443,7 @@
                    (end point))
         (funcall search-fn end string)
         (funcall search-previous-fn (move-point start end) string)
-        (when (point<= start point)
+        (when (point< end point)
           (move-point point end)))
       (dotimes (_ (abs n) point)
         (unless (funcall search-fn point string)