* lisp/isearch.el (isearch-mode): Don't char-fold regexps

(bug#20913)

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 9ecbbdf11ed0ade8554614bf43422d9a623352f2..45c6d97dd3690b62b4c43f6f4b79d6b7c9c1dee6 100644 (file)
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -863,6 +863,7 @@ convert the search string to a regexp used by regexp search functions."
   (setq isearch-forward forward
        isearch-regexp regexp
        isearch-word (or word (and character-fold-search
+                                   (not regexp)
                                    'character-fold-to-regexp))
        isearch-op-fun op-fun
        isearch-last-case-fold-search isearch-case-fold-search