diff options
author | Juri Linkov <juri@jurta.org> | 2012-03-11 12:27:53 +0200 |
---|---|---|
committer | Juri Linkov <juri@jurta.org> | 2012-03-11 12:27:53 +0200 |
commit | 300e8fa5624c0670553c1215409c9d31075901d1 (patch) | |
tree | 65de08d39d9047677f64d01664ab9845166d24d9 /lisp/replace.el | |
parent | 179f69112df62a6ed2aeefb53d900c4dc9cd0e81 (diff) | |
download | emacs-300e8fa5624c0670553c1215409c9d31075901d1.tar.gz |
* lisp/replace.el (replace-highlight): Set isearch-word to nil unconditionally.
Fixes: debbugs:10887
Diffstat (limited to 'lisp/replace.el')
-rw-r--r-- | lisp/replace.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 349e63d4201..9fbaa279079 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -2116,13 +2116,13 @@ make, or the user didn't cancel the call." (if query-replace-lazy-highlight (let ((isearch-string string) (isearch-regexp regexp) + ;; Set isearch-word to nil because word-replace is regexp-based, + ;; so `isearch-search-fun' should not use `word-search-forward'. + (isearch-word nil) (search-whitespace-regexp nil) (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)) (isearch-lazy-highlight-new-loop range-beg range-end)))) (defun replace-dehighlight () |