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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f0c5040b5ecc45b3b9dcad04f6273ba30dff3934..a7621f18696a52e921d17b5381c1de012f6c44ed 100644 (file)
--- 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 8f27b0e162b0fc6b55884c6212a17738abebcd15..50d221b6fa0165ebf1d7b48ac5cd5fbae455a4ca 100644 (file)
--- 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.")