mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

* lisp/isearch.el (isearch-occur): Let-bind `search-spaces-regexp' to

Browse Source 
`search-whitespace-regexp' only when `isearch-regexp' is non-nil.

Fixes: debbugs:9364
This commit is contained in:
Juri Linkov 2011-10-24 08:56:04 +03:00
parent feecf43567
commit db2440b6cc
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ChangeLog
View File

@ -1,3 +1,9 @@
2011-10-24 Juri Linkov <juri@jurta.org>
* isearch.el (isearch-occur): Let-bind `search-spaces-regexp' to
`search-whitespace-regexp' only when `isearch-regexp' is non-nil.
(Bug#9364)
2011-10-24 Juri Linkov <juri@jurta.org>
* info.el (Info-following-node-name-re): Add newline to the list

2
lisp/isearch.el
View File

@ -1452,7 +1452,7 @@ string. NLINES has the same meaning as in `occur'."
;; Set `search-upper-case' to nil to not call
;; `isearch-no-upper-case-p' in `occur-1'.
(search-upper-case nil)
(search-spaces-regexp search-whitespace-regexp))
(search-spaces-regexp (if isearch-regexp search-whitespace-regexp)))
(occur regexp nlines)))
(declare-function hi-lock-read-face-name "hi-lock" ())