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

2 files changed, 5 insertions, 1 deletions

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.")