[nongnu] elpa/apropospriate-theme 12e010d 114/118: add support for Corfu and Vertico

[ELPA Syncer]

branch: elpa/apropospriate-theme
commit 12e010d9f10924056035733d5d773281413dc15b
Author: justin talbott <justin@waymondo.com>
Commit: justin talbott <justin@waymondo.com>

    add support for Corfu and Vertico
---
 README.md        | 2 ++
 apropospriate.el | 5 +++++
 2 files changed, 7 insertions(+)

diff --git a/README.md b/README.md
index 5ccc587..07657fb 100644
--- a/README.md
+++ b/README.md
@@ -109,3 +109,5 @@ Apropospriate supports all the usual `prog-mode` derived 
packages as well as som
 * Company Posframe
 * Goggles
 * Orderless
+* Corfu
+* Vertico
diff --git a/apropospriate.el b/apropospriate.el
index 147474e..29d56b0 100644
--- a/apropospriate.el
+++ b/apropospriate.el
@@ -207,6 +207,7 @@ Set to `1.0' or nil to prevent font size manipulation."
      `(ido-indicator ((,class (:foreground ,red :background ,base00+1))))
      `(ido-virtual ((,class (:foreground ,cyan))))
      `(ido-vertical-match-face ((,class (:foreground ,yellow))))
+     `(vertico-current ((,class (:background ,base00-2))))
      `(grizzl-selection-face ((,class (:inherit match))))
      `(orderless-match-face-0 ((,class (:foreground ,blue :background 
,base00-1 :weight bold))))
      `(orderless-match-face-1 ((,class (:foreground ,purple :background 
,base00-1 :weight bold))))
@@ -285,6 +286,10 @@ Set to `1.0' or nil to prevent font size manipulation."
      `(company-preview ((,class (:background ,base00 :foreground ,base02))))
      `(company-preview-common ((,class (:foreground ,base02))))
      `(company-preview-search ((,class (:background ,base00))))
+     `(corfu-background ((,class (:background ,base00-2 :foreground ,base03))))
+     `(corfu-current ((,class (:background ,base00-1 :foreground ,base03))))
+     `(corfu-bar ((,class (:background ,base00+1 :foreground ,base00+3))))
+     `(corfu-border ((,class (:background ,base00-1 :foreground ,base03))))
      `(ac-completion-face ((,class :inherit company-preview)))
      `(tooltip ((,class (:background ,base00-1 :foreground ,base03))))
      `(popup-tip-face ((,class (:inherit tooltip))))