[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 1b1b664: * lisp/replace.el (query-replace-read-from
From: |
Juri Linkov |
Subject: |
[Emacs-diffs] master 1b1b664: * lisp/replace.el (query-replace-read-from): Add separator to |
Date: |
Mon, 22 Jun 2015 22:59:36 +0000 |
branch: master
commit 1b1b6644c8cb27539ca99e97ef2f352f411c06d8
Author: Juri Linkov <address@hidden>
Commit: Juri Linkov <address@hidden>
* lisp/replace.el (query-replace-read-from): Add separator to
the local binding of text-property-default-nonsticky. (Bug#20690)
---
lisp/replace.el | 2 ++
1 files changed, 2 insertions(+), 0 deletions(-)
diff --git a/lisp/replace.el b/lisp/replace.el
index 1bf1343..74909ef 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -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"
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 1b1b664: * lisp/replace.el (query-replace-read-from): Add separator to,
Juri Linkov <=