From 460c0fbaf95afc285c0d5f34c7a514bd56292902 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Johan=20Bockg=C3=A5rd?= Date: Tue, 12 Jul 2011 23:59:09 +0200 Subject: [PATCH] * mouse-sel.el (mouse-sel-primary-overlay): Use the `region' face. --- lisp/ChangeLog | 4 ++++ lisp/mouse-sel.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) 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 + + * mouse-sel.el (mouse-sel-primary-overlay): Use the `region' face. + 2011-07-12 Chong Yidong * 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.") -- 2.11.4.GIT