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

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

[nongnu] elpa/telephone-line a84f75000c 017/195: Face hierarchy


From: ELPA Syncer
Subject: [nongnu] elpa/telephone-line a84f75000c 017/195: Face hierarchy
Date: Wed, 5 Jan 2022 02:59:17 -0500 (EST)

branch: elpa/telephone-line
commit a84f75000cf02d69c7e4a578ee752f4a0ef161d0
Author: Daniel Bordak <dbordak@fastmail.fm>
Commit: Daniel Bordak <dbordak@fastmail.fm>

    Face hierarchy
---
 telephone-line.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/telephone-line.el b/telephone-line.el
index e8804221ec..c036fe2e38 100644
--- a/telephone-line.el
+++ b/telephone-line.el
@@ -56,37 +56,37 @@
   :group 'telephone-line-evil)
 
 (defface evil-insert
-  '((t (:foreground "white" :background "green" :weight bold :inherit 
mode-line)))
+  '((t (:background "green" :weight bold :inherit evil)))
   "Face used in evil color-coded segments when in Insert state."
   :group 'telephone-line-evil)
 
 (defface evil-normal
-  '((t (:foreground "white" :background "red" :weight bold :inherit 
mode-line)))
+  '((t (:background "red" :weight bold :inherit evil)))
   "Face used in evil color-coded segments when in Normal state."
   :group 'telephone-line-evil)
 
 (defface evil-visual
-  '((t (:foreground "white" :background "orange" :weight bold :inherit 
mode-line)))
+  '((t (:background "orange" :weight bold :inherit evil)))
   "Face used in evil color-coded segments when in Visual{,-Block,-Line} state."
   :group 'telephone-line-evil)
 
 (defface evil-replace
-  '((t (:foreground "white" :background "black" :weight bold :inherit 
mode-line)))
+  '((t (:background "black" :weight bold :inherit evil)))
   "Face used in evil color-coded segments when in Replace state."
   :group 'telephone-line-evil)
 
 (defface evil-motion
-  '((t (:foreground "white" :background "blue" :weight bold :inherit 
mode-line)))
+  '((t (:background "blue" :weight bold :inherit evil)))
   "Face used in evil color-coded segments when in Motion state."
   :group 'telephone-line-evil)
 
 (defface evil-operator
-  '((t (:foreground "white" :background "sky blue" :weight bold :inherit 
mode-line)))
+  '((t (:background "sky blue" :weight bold :inherit evil)))
   "Face used in evil color-coded segments when in Operator state."
   :group 'telephone-line-evil)
 
 (defface evil-emacs
-  '((t (:foreground "white" :background "blue violet" :weight bold :inherit 
mode-line)))
+  '((t (:background "blue violet" :weight bold :inherit evil)))
   "Face used in evil color-coded segments when in Emacs state."
   :group 'telephone-line-evil)
 



reply via email to

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