branch: externals/eglot
commit f9df418ab7fffdc0dc0f75f88e33972f5f9b60c4
Author: Augusto Stoffel <[email protected]>
Commit: GitHub <[email protected]>
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))))
