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

This commit is contained in:
Richard M. Stallman 2005-08-09 11:27:18 +00:00
parent a335c7d564
commit f4c49513ec

View file

@ -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.