diff options
| -rw-r--r-- | lisp/character-fold.el | 2 | ||||
| -rw-r--r-- | lisp/isearch.el | 11 |
2 files changed, 6 insertions, 7 deletions
diff --git a/lisp/character-fold.el b/lisp/character-fold.el index 6bbb3ec87e4..988a5065c0d 100644 --- a/lisp/character-fold.el +++ b/lisp/character-fold.el @@ -24,7 +24,7 @@ ;;;###autoload -(defvar character-fold-search t +(defvar character-fold-search nil "Non-nil if searches should fold similar characters. This means some characters will match entire groups of characters. For instance, \" will match all variants of double quotes, and diff --git a/lisp/isearch.el b/lisp/isearch.el index 2d2f0ee2495..8d4bf24c6fb 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -2607,12 +2607,11 @@ Can be changed via `isearch-search-fun-function' for special needs." ;; Use lax versions to not fail at the end of the word while ;; the user adds and removes characters in the search string ;; (or when using nonincremental word isearch) - (let ((lax (or isearch-lax-whitespace - (not (or isearch-nonincremental - (null (car isearch-cmds)) - (eq (length isearch-string) - (length (isearch--state-string - (car isearch-cmds))))))))) + (let ((lax (not (or isearch-nonincremental + (null (car isearch-cmds)) + (eq (length isearch-string) + (length (isearch--state-string + (car isearch-cmds)))))))) (funcall (if isearch-forward #'re-search-forward #'re-search-backward) (if (functionp isearch-word) |