diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2010-08-08 17:12:29 -0400 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2010-08-08 17:12:29 -0400 |
| commit | 7815fe1985833c57457882b415a29358991dabdc (patch) | |
| tree | ab8aabf9ad322c149a6434712c14b93bb93543dc /lisp/replace.el | |
| parent | 25717ca11cae32e191e3dc9318562190d682f425 (diff) | |
| parent | e54a1075033073f835596ab666eeed099028beb8 (diff) | |
| download | emacs-7815fe1985833c57457882b415a29358991dabdc.tar.gz | |
Merge changes from emacs-23 branch
Diffstat (limited to 'lisp/replace.el')
| -rw-r--r-- | lisp/replace.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index d73692ccc20..01d971f76eb 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -1979,7 +1979,9 @@ make, or the user didn't cancel the call." (let ((isearch-string string) (isearch-regexp regexp) (search-whitespace-regexp nil) - (isearch-case-fold-search case-fold)) + (isearch-case-fold-search case-fold) + (isearch-forward t) + (isearch-error nil)) ;; Set isearch-word to nil because word-replace is regexp-based, ;; so `isearch-search-fun' should not use `word-search-forward'. (if (and isearch-word isearch-regexp) (setq isearch-word nil)) |