(isearch-message-prefix):

Change "wrapped" to "overwrapped" when past original start point.

1 files changed, 5 insertions, 0 deletions

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 3e74c811170..cd035b08b3e 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1312,6 +1312,11 @@ If there is no completion possible, say so and continue searching."
   ;; If currently failing, display no ellipsis.
   (or isearch-success (setq ellipsis nil))
   (let ((m (concat (if isearch-success "" "failing ")
+                   (if (and isearch-wrapped
+                            (if isearch-forward
+                                (> (point) isearch-opoint)
+                              (< (point) isearch-opoint)))
+                       "over")
                    (if isearch-wrapped "wrapped ")
                    (if isearch-word "word " "")
                    (if isearch-regexp "regexp " "")