branch: externals/standard-themes
commit 8c0cc4a25f0bc61b45e9a54e80997b4e716a788d
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Add explicit support for which-key package
---
README.org | 1 +
standard-themes.el | 9 +++++++++
2 files changed, 10 insertions(+)
diff --git a/README.org b/README.org
index 3d67e11a33..f27960bded 100644
--- a/README.org
+++ b/README.org
@@ -1198,6 +1198,7 @@ everything most users need.
- vertico
- wgrep
- which-function-mode
+- which-key [Part of {{{development-version}}}]
- whitespace-mode
- widget
- writegood-mode
diff --git a/standard-themes.el b/standard-themes.el
index c819baffe1..98d3d9af6e 100644
--- a/standard-themes.el
+++ b/standard-themes.el
@@ -2027,6 +2027,15 @@ Optional prefix argument MAPPINGS has the same meaning
as for
`(wgrep-reject-face ((,c :background ,bg-err :foreground ,err)))
;;;; which-function-mode
`(which-func ((,c :inherit bold :foreground ,modeline-warning))) ; same as
`breadcrumb-imenu-leaf-face'
+;;;; which-key
+ `(which-key-command-description-face ((,c :foreground ,fg-main)))
+ `(which-key-group-description-face ((,c :foreground ,string)))
+ `(which-key-highlighted-command-face ((,c :foreground ,warning :underline
t)))
+ `(which-key-key-face ((,c :inherit standard-themes-key-binding)))
+ `(which-key-local-map-description-face ((,c :foreground ,fg-main)))
+ `(which-key-note-face ((,c :inherit shadow)))
+ `(which-key-separator-face ((,c :inherit shadow)))
+ `(which-key-special-key-face ((,c :inherit error)))
;;;; whitespace-mode
`(whitespace-big-indent ((,c :background ,bg-space-err)))
`(whitespace-empty ((,c :inherit standard-themes-intense-magenta)))
