From: Johan Bockgård <bojohan@gnu.org>
Date: Tue, 12 Jul 2011 21:59:09 +0000 (+0200)
Subject: * mouse-sel.el (mouse-sel-primary-overlay): Use the `region' face.
X-Git-Tag: emacs-pretest-24.0.90~104^2~340
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=460c0fbaf95afc285c0d5f34c7a514bd56292902;p=emacs.git

* mouse-sel.el (mouse-sel-primary-overlay): Use the `region' face.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f0c5040b5ec..a7621f18696 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-07-12  Johan Bockgård  <bojohan@gnu.org>
+
+	* mouse-sel.el (mouse-sel-primary-overlay): Use the `region' face.
+
 2011-07-12  Chong Yidong  <cyd@stupidchicken.com>
 
 	* mouse-sel.el: Hack restoring functionality, while keeping
diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el
index 8f27b0e162b..50d221b6fa0 100644
--- a/lisp/mouse-sel.el
+++ b/lisp/mouse-sel.el
@@ -279,7 +279,7 @@ kill ring; mouse-1 or mouse-3 kills it."
 (defconst mouse-sel-primary-overlay
   (let ((ol (make-overlay (point-min) (point-min))))
     (delete-overlay ol)
-    (overlay-put ol 'face 'secondary-selection)
+    (overlay-put ol 'face 'region)
     ol)
   "An overlay which records the current primary selection.
 This is used by Mouse Sel mode only.")