From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Wed, 21 Oct 2015 16:16:36 +0000 (+0100)
Subject: * lisp/isearch.el: Support lax-whitespace in regexp-function searches
X-Git-Tag: emacs-25.0.90~1070
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=19fada58e2a982024ae31272cc054af80961eb37;p=emacs.git

* lisp/isearch.el: Support lax-whitespace in regexp-function searches

(isearch-search-fun-default): Let-bind `search-spaces-regexp'
around `isearch-regexp-function'.
---

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 26e6eb1d7d4..61ae42e16f8 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2621,7 +2621,9 @@ Can be changed via `isearch-search-fun-function' for special needs."
 			  (null (car isearch-cmds))
 			  (eq (length isearch-string)
 			      (length (isearch--state-string
-                                       (car isearch-cmds))))))))
+                                       (car isearch-cmds)))))))
+            (search-spaces-regexp (when isearch-lax-whitespace
+                                    search-whitespace-regexp)))
 	(funcall
 	 (if isearch-forward #'re-search-forward #'re-search-backward)
 	 (if (functionp isearch-regexp-function)