From e57a0c3d38b3e2bdd408a7e02b7308fa281f3073 Mon Sep 17 00:00:00 2001 From: Mark Oteiza Date: Mon, 12 Oct 2015 16:46:29 -0400 Subject: [PATCH] Use highlight for current items. * lisp/mpc.el (mpc-select-make-overlay, mpc-tagbrowser-all-select): Apply highlight face instead of region face. --- lisp/mpc.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/mpc.el b/lisp/mpc.el index 6e69b6fa9d0..a5fc376eaea 100644 --- a/lisp/mpc.el +++ b/lisp/mpc.el @@ -1263,7 +1263,7 @@ If PLAYLIST is t or nil or missing, use the main playlist." (let ((ol (make-overlay (line-beginning-position) (line-beginning-position 2)))) (overlay-put ol 'mpc-select t) - (overlay-put ol 'face 'region) + (overlay-put ol 'face 'highlight) (overlay-put ol 'evaporate t) (push ol mpc-select))) @@ -1562,7 +1562,7 @@ when constructing the set of constraints." (move-overlay mpc-tagbrowser-all-ol (point) (line-beginning-position 2)) (let ((ol (make-overlay (point) (line-beginning-position 2)))) - (overlay-put ol 'face 'region) + (overlay-put ol 'face 'highlight) (overlay-put ol 'evaporate t) (setq-local mpc-tagbrowser-all-ol ol)))))) -- 2.39.2