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

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

[nongnu] elpa/alect-themes 6679070 133/269: Revise compilation faces


From: ELPA Syncer
Subject: [nongnu] elpa/alect-themes 6679070 133/269: Revise compilation faces
Date: Thu, 21 Oct 2021 17:59:05 -0400 (EDT)

branch: elpa/alect-themes
commit 6679070893c12b10e223e0ffd6f555d95eab029d
Author: Alex Kost <alezost@gmail.com>
Commit: Alex Kost <alezost@gmail.com>

    Revise compilation faces
    
    Some faces do not exist and some ("...-face") are actually variables.
---
 alect-themes.el | 20 +++++++-------------
 1 file changed, 7 insertions(+), 13 deletions(-)

diff --git a/alect-themes.el b/alect-themes.el
index 1c25f1c..ebaf1c4 100644
--- a/alect-themes.el
+++ b/alect-themes.el
@@ -496,20 +496,14 @@ For INVERT, see `alect-get-color'."
          (company-scrollbar-bg              ((,c :background ,(gc 'gray))))
 
          ;; compilation
-         (compilation-column-face           ((,c :foreground ,(gc 'yellow))))
-         (compilation-enter-directory-face  ((,c :foreground ,(gc 'green))))
-         (compilation-error-face            ((,c :foreground ,(gc 'red-1) 
:weight bold :underline t)))
-         (compilation-face                  ((,c :foreground ,(gc 'fg+1))))
-         (compilation-info-face             ((,c :foreground ,(gc 'blue))))
-         (compilation-info                  ((,c :foreground ,(gc 'green-2) 
:underline t)))
-         (compilation-leave-directory-face  ((,c :foreground ,(gc 'green))))
-         (compilation-line-face             ((,c :foreground ,(gc 'yellow))))
+         (compilation-info                  ((,c :foreground ,(gc 'green-2))))
+         (compilation-warning               ((,c :inherit warning)))
+         (compilation-error                 ((,c :inherit error)))
          (compilation-line-number           ((,c :foreground ,(gc 'yellow))))
-         (compilation-message-face          ((,c :foreground ,(gc 'blue))))
-         (compilation-warning-face          ((,c :foreground ,(gc 'fg-2) 
:weight bold :underline t)))
-         (compilation-mode-line-exit        ((,c :foreground ,(gc 'green+2) 
:weight bold)))
-         (compilation-mode-line-fail        ((,c :foreground ,(gc 'red) 
:weight bold)))
-         (compilation-mode-line-run         ((,c :foreground ,(gc 'yellow) 
:weight bold)))
+         (compilation-column-number         ((,c :foreground ,(gc 'yellow+2))))
+         (compilation-mode-line-run         ((,c :foreground ,(gc 'blue))))
+         (compilation-mode-line-exit        ((,c :inherit success)))
+         (compilation-mode-line-fail        ((,c :inherit compilation-error)))
 
          ;; ctable
          (ctbl:face-cell-select  ((,c :background ,(gc 'blue)



reply via email to

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