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

Fix highlighting in query-replace with non-nil replace-char-fold

Browse source 
* lisp/replace.el (replace-highlight): Bind
'isearch-regexp-function' in the same way that function
'replace-search' does, so as to respect the value of
'replace-char-fold'.  (Bug#24356)
This commit is contained in:
Charles A. Roelli 2017-12-26 12:46:39 +01:00
parent 23ecd63ba4
commit 9f9b56b7da
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/replace.el
View file

@ -2212,7 +2212,10 @@ It is called with three arguments, as if it were
(if query-replace-lazy-highlight
(let ((isearch-string search-string)
(isearch-regexp regexp-flag)
(isearch-regexp-function delimited-flag)
(isearch-regexp-function (or delimited-flag
(and replace-char-fold
(not regexp-flag)
#'char-fold-to-regexp)))
(isearch-lax-whitespace
replace-lax-whitespace)
(isearch-regexp-lax-whitespace