[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 19fada5 2/3: * lisp/isearch.el: Support lax-whitesp
From: |
Artur Malabarba |
Subject: |
[Emacs-diffs] master 19fada5 2/3: * lisp/isearch.el: Support lax-whitespace in regexp-function searches |
Date: |
Wed, 21 Oct 2015 16:36:22 +0000 |
branch: master
commit 19fada58e2a982024ae31272cc054af80961eb37
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
* lisp/isearch.el: Support lax-whitespace in regexp-function searches
(isearch-search-fun-default): Let-bind `search-spaces-regexp'
around `isearch-regexp-function'.
---
lisp/isearch.el | 4 +++-
1 files changed, 3 insertions(+), 1 deletions(-)
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 26e6eb1..61ae42e 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)