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

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

[nongnu] elpa/apropospriate-theme 5a0badf 053/118: make popup & auto-com


From: ELPA Syncer
Subject: [nongnu] elpa/apropospriate-theme 5a0badf 053/118: make popup & auto-complete faces inherit company styling
Date: Thu, 21 Oct 2021 18:02:21 -0400 (EDT)

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

    make popup & auto-complete faces inherit company styling
    
    fixes #13
---
 apropospriate.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/apropospriate.el b/apropospriate.el
index af022c4..aa7045e 100644
--- a/apropospriate.el
+++ b/apropospriate.el
@@ -220,13 +220,15 @@
      `(company-preview ((,class (:background ,base00 :foreground ,base02))))
      `(company-preview-common ((,class (:foreground ,base02))))
      `(company-preview-search ((,class (:background ,base00))))
+     `(ac-completion-face ((,class :inherit company-preview)))
      `(tooltip ((,class (:background ,base03 :foreground ,base00 :height 
0.9))))
      `(popup-tip-face ((,class (:inherit tooltip))))
-     `(popup-face ((,class (:foreground ,base00+1 :background ,base03))))
-     `(popup-menu-selection-face ((,class (:foreground ,base03 :background 
,blue))))
+     `(popup-face ((,class (:inherit company-tooltip))))
+     `(popup-menu-mouse-face ((,class (:inherit popup-face))))
+     `(popup-menu-selection-face ((,class (:inherit 
company-tooltip-selection))))
      `(popup-isearch-match ((,class (:foreground ,yellow :background nil))))
      `(popup-scroll-bar-foreground-face ((,class (:inherit 
company-scrollbar-fg))))
-     `(popup-scroll-bar-background-face ((,class (:background ,base02))))
+     `(popup-scroll-bar-background-face ((,class (:inherit 
company-scrollbar-bg))))
      `(flymake-warnline ((,class (:underline ,orange :background ,base00+1))))
      `(flymake-errline ((,class (:underline ,red :background ,base00+1))))
      `(flycheck-error ((,class (:underline (:style wave :color ,red) :inherit 
unspecified))))



reply via email to

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