branch: externals/ef-themes
commit 9dd64aac824c93387626f2f16c6609aac5852654
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Add support for selectrum
It is a standards-compliant package like 'vertico'.
---
README.org | 3 +--
ef-themes.el | 6 ++++++
2 files changed, 7 insertions(+), 2 deletions(-)
diff --git a/README.org b/README.org
index 339f9ed4df..e12a7914ff 100644
--- a/README.org
+++ b/README.org
@@ -867,6 +867,7 @@ everything most users need.
- recursion-indicator [ Part of {{{development-version}}} ]
- regexp-builder (re-builder)
- ruler-mode
+- selectrum [ Part of {{{development-version}}} ]
- shell-script-mode (sh-mode)
- show-paren-mode
- shr
@@ -954,8 +955,6 @@ unwillingness to be good Emacs citizens:
violates our expectation of how the mode-line is supposed to look by
placing the designated default background in unexpected places.
-- selectrum :: use =vertico=.
-
- solaire :: in principle, it is incompatible with practically every
theme that is not designed around it. Emacs does not distinguish
between "UI" and "syntax" buffers.
diff --git a/ef-themes.el b/ef-themes.el
index 039a72b854..dc83833e6e 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -1504,6 +1504,12 @@ Helper function for `ef-themes-preview-colors'."
`(ruler-mode-margins ((,c :inherit ruler-mode-default :foreground
,bg-main)))
`(ruler-mode-pad ((,c :inherit ruler-mode-default :background ,bg-alt
:foreground ,fg-dim)))
`(ruler-mode-tab-stop ((,c :inherit ruler-mode-default :foreground
,yellow)))
+;;;; selectrum
+ `(selectrum-completion-annotation ((,c :inherit completions-annotations)))
+ `(selectrum-completion-docsig ((,c :inherit completions-annotations)))
+ `(selectrum-current-candidate ((,c :background ,bg-completion)))
+ `(selectrum-group-title ((,c :inherit bold :foreground ,name)))
+ `(selectrum-mouse-highlight ((,c :inherit highlight)))
;;;; show-paren-mode
`(show-paren-match ((,c :background ,bg-paren :foreground ,fg-intense)))
`(show-paren-match-expression ((,c :background ,bg-alt)))
