* lisp/replace.el (replace-search): Fix regexp case (bug#20901)

2015-06-26 19:01:50 +01:00 · 2015-06-26 19:01:50 +01:00 · aa2da6ef10
commit aa2da6ef10
parent ff80437668
1 changed files with 1 additions and 0 deletions
--- a/lisp/replace.el
+++ b/lisp/replace.el
@ -2014,6 +2014,7 @@ It is called with three arguments, as if it were
  (let* ((isearch-regexp regexp-flag)
 	 (isearch-word (or delimited-flag
                           (and replace-character-fold
+                                (not regexp-flag)
                                #'character-fold-to-regexp)))
 	 (isearch-lax-whitespace
 	  replace-lax-whitespace)