summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/simple.el5
2 files changed, 7 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d0d4a31ab65..7ec5cdb5565 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-08-07 Chong Yidong <cyd@gnu.org>
+
+ * simple.el (deactivate-mark): Preserve text properties when
+ saving the primary selection (Bug#8384).
+
2012-08-07 Kevin Ryde <user42@zip.com.au>
* woman.el (woman0-if): Quietly treat ".if v" as false (Bug#12109).
diff --git a/lisp/simple.el b/lisp/simple.el
index 6b5da29b3bb..0877f396faa 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3960,9 +3960,8 @@ run `deactivate-mark-hook'."
(or (x-selection-owner-p 'PRIMARY)
(null (x-selection-exists-p 'PRIMARY))))
(x-set-selection 'PRIMARY
- (buffer-substring-no-properties
- (region-beginning)
- (region-end))))))
+ (buffer-substring (region-beginning)
+ (region-end))))))
(if (and (null force)
(or (eq transient-mark-mode 'lambda)
(and (eq (car-safe transient-mark-mode) 'only)