comparison lisp/replace.el @ 75921:1c3c5aeeb934

(replace-highlight): Bind search-whitespace-regexp to nil.
author Chong Yidong <cyd@stupidchicken.com>
date Thu, 15 Feb 2007 16:54:24 +0000
parents e3694f1cb928
children 91de64a1c05e dd7c098af727
comparison
equal deleted inserted replaced
75920:e78fc0d23669 75921:1c3c5aeeb934
1726 (overlay-put replace-overlay 'priority 1001) ;higher than lazy overlays 1726 (overlay-put replace-overlay 'priority 1001) ;higher than lazy overlays
1727 (overlay-put replace-overlay 'face 'query-replace))) 1727 (overlay-put replace-overlay 'face 'query-replace)))
1728 (if query-replace-lazy-highlight 1728 (if query-replace-lazy-highlight
1729 (let ((isearch-string string) 1729 (let ((isearch-string string)
1730 (isearch-regexp regexp) 1730 (isearch-regexp regexp)
1731 (search-whitespace-regexp nil)
1731 (isearch-case-fold-search case-fold)) 1732 (isearch-case-fold-search case-fold))
1732 (isearch-lazy-highlight-new-loop range-beg range-end)))) 1733 (isearch-lazy-highlight-new-loop range-beg range-end))))
1733 1734
1734 (defun replace-dehighlight () 1735 (defun replace-dehighlight ()
1735 (when replace-overlay 1736 (when replace-overlay