* lisp/replace.el (query-replace-read-from): Add separator to
the local binding of text-property-default-nonsticky. (Bug#20690)
This commit is contained in:
parent
d010523177
commit
1b1b6644c8
1 changed files with 2 additions and 0 deletions
|
@ -156,6 +156,8 @@ wants to replace FROM with TO."
|
|||
;; unavailable while preparing to dump.
|
||||
(custom-reevaluate-setting 'query-replace-from-to-separator)
|
||||
(let* ((history-add-new-input nil)
|
||||
(text-property-default-nonsticky
|
||||
(cons '(separator . t) text-property-default-nonsticky))
|
||||
(separator
|
||||
(when query-replace-from-to-separator
|
||||
(propertize "\0"
|
||||
|
|
Loading…
Add table
Reference in a new issue