From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Fri, 26 Jun 2015 18:01:50 +0000 (+0100)
Subject: * lisp/replace.el (replace-search): Fix regexp case (bug#20901)
X-Git-Tag: emacs-25.0.90~1633
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=aa2da6ef104b0abf0ee310c9c96ee5451d01bff5;p=emacs.git

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

diff --git a/lisp/replace.el b/lisp/replace.el
index 65a2b41f1ea..41debdd9cf7 100644
--- 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)