[elpa] externals/eglot f9df418 06/49: Fix #584: Define a face for symbol highlight

[Stefan Monnier]

branch: externals/eglot
commit f9df418ab7fffdc0dc0f75f88e33972f5f9b60c4
Author: Augusto Stoffel <astoff@users.noreply.github.com>
Commit: GitHub <noreply@github.com>

    Fix #584: Define a face for symbol highlight
    
    Also per #583.
    
    * eglot.el (eglot-highlight-symbol-face): New face.
    (eglot--highlight-piggyback): Use it.
---
 eglot.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/eglot.el b/eglot.el
index f843c2d..6d51fc7 100644
--- a/eglot.el
+++ b/eglot.el
@@ -166,6 +166,10 @@ of those modes.  CONTACT can be:
   should not ask the user for any input, and return nil or signal
   an error if it can't produce a valid CONTACT.")
 
+(defface eglot-highlight-symbol-face
+  '((t (:inherit bold)))
+  "Face used to highlight the symbol at point.")
+
 (defface eglot-mode-line
   '((t (:inherit font-lock-constant-face :weight bold)))
   "Face for package-name in EGLOT's mode line.")
@@ -2367,7 +2371,7 @@ is not active."
                     (pcase-let ((`(,beg . ,end)
                                  (eglot--range-region range)))
                       (let ((ov (make-overlay beg end)))
-                        (overlay-put ov 'face 'highlight)
+                        (overlay-put ov 'face 'eglot-highlight-symbol-face)
                         (overlay-put ov 'evaporate t)
                         ov)))
                   highlights))))