emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/material-theme fe8e33d 054/118: add faces for which-key pa


From: ELPA Syncer
Subject: [nongnu] elpa/material-theme fe8e33d 054/118: add faces for which-key package
Date: Thu, 21 Oct 2021 18:06:19 -0400 (EDT)

branch: elpa/material-theme
commit fe8e33ddbc2639cd35de1f34a8e78e35c4e22dea
Author: Christoph Paulik <cpaulik@gmail.com>
Commit: Christoph Paulik <cpaulik@gmail.com>

    add faces for which-key package
---
 material-light-theme.el | 6 ++++++
 material-theme.el       | 6 ++++++
 2 files changed, 12 insertions(+)

diff --git a/material-light-theme.el b/material-light-theme.el
index 1e32140..5cf7473 100644
--- a/material-light-theme.el
+++ b/material-light-theme.el
@@ -401,6 +401,12 @@
    `(guide-key/highlight-command-face ((,class (:foreground ,yellow ))))
    `(guide-key/prefix-command-face ((,class (:foreground ,aqua ))))
 
+   ;; which-key
+   `(which-key-key-face ((,class (:foreground ,foreground  :weight bold))))
+   `(which-key-special-key-face ((,class (:foreground ,orange  :weight bold 
:height 1.1))))
+   `(which-key-command-description-face ((,class (:foreground ,foreground ))))
+   `(which-key-group-description-face ((,class (:foreground ,blue ))))
+   `(which-key-separator-face ((,class (:foreground ,comment ))))
 
    ;; mark-multiple
    `(mm/master-face ((,class (:inherit region :foreground nil :background 
nil))))
diff --git a/material-theme.el b/material-theme.el
index c0a1a7d..7ad9fb2 100644
--- a/material-theme.el
+++ b/material-theme.el
@@ -399,6 +399,12 @@
    `(guide-key/highlight-command-face ((,class (:foreground ,yellow ))))
    `(guide-key/prefix-command-face ((,class (:foreground ,aqua ))))
 
+   ;; which-key
+   `(which-key-key-face ((,class (:foreground ,foreground  :weight bold))))
+   `(which-key-special-key-face ((,class (:foreground ,orange  :weight bold 
:height 1.1))))
+   `(which-key-command-description-face ((,class (:foreground ,foreground ))))
+   `(which-key-group-description-face ((,class (:foreground ,aqua ))))
+   `(which-key-separator-face ((,class (:foreground ,comment ))))
 
    ;; mark-multiple
    `(mm/master-face ((,class (:inherit region :foreground nil :background 
nil))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]