procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
(isearch-search-fun-default): Let-bind `search-spaces-regexp'
around `isearch-regexp-function'.
This commit is contained in:
Artur Malabarba 2015-10-21 17:16:36 +01:00
parent ab65b33f8c
commit 19fada58e2
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/isearch.el
View file

@ -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)