From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 9 Aug 2005 11:27:18 +0000 (+0000)
Subject: (isearch-repeat): When changing direction, mark search successful.
X-Git-Tag: emacs-pretest-22.0.90~7715
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f4c49513ecebd4be3e02b70c09ee37b7af20acd4;p=emacs.git

(isearch-repeat): When changing direction, mark search successful.
---

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 56a73a689a5..f3fc51778e9 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1147,7 +1147,8 @@ Use `isearch-exit' to quit without signaling."
 		  (funcall isearch-wrap-function)
 	        (goto-char (if isearch-forward (point-min) (point-max)))))))
     ;; C-s in reverse or C-r in forward, change direction.
-    (setq isearch-forward (not isearch-forward)))
+    (setq isearch-forward (not isearch-forward)
+	  isearch-success t))
 
   (setq isearch-barrier (point)) ; For subsequent \| if regexp.