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

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

[elpa] externals/org-modern 3640955abc 05/65: Use adjusted date and time


From: ELPA Syncer
Subject: [elpa] externals/org-modern 3640955abc 05/65: Use adjusted date and time faces, see #1
Date: Mon, 7 Mar 2022 12:57:44 -0500 (EST)

branch: externals/org-modern
commit 3640955abc26a13f8fa25d879c2b01278af41a96
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Use adjusted date and time faces, see #1
    
    Thanks, @protesilaos!
---
 org-modern.el | 27 ++++++++++++---------------
 1 file changed, 12 insertions(+), 15 deletions(-)

diff --git a/org-modern.el b/org-modern.el
index 50905de28c..bbe578570f 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -172,27 +172,24 @@ Set to nil to disable the progress bar."
   "Face used for active date labels.")
 
 (defface org-modern-time-active
-  '((((background light))
-     :inherit org-modern-label :weight semibold
-     :background "gray40" :foreground "white")
-    (t :inherit org-modern-label :weight semibold
-       :background "gray60" :foreground "black"))
+  '((default :inherit org-modern-label :weight semibold)
+    (((background light))
+     :background "gray35" :foreground "white")
+    (t :background "gray75" :foreground "black"))
   "Face used for active time labels.")
 
 (defface org-modern-date-inactive
-  '((((background light))
-     :inherit org-modern-label
-     :background "gray90" :foreground "gray40")
-    (t :inherit org-modern-label
-       :background "gray20" :foreground "gray60"))
+  '((default :inherit org-modern-label)
+    (((background light))
+     :background "gray90" :foreground "gray30")
+    (t :background "gray20" :foreground "gray70"))
   "Face used for inactive date labels.")
 
 (defface org-modern-time-inactive
-  '((((background light))
-     :inherit org-modern-label
-     :background "gray60" :foreground "gray90")
-    (t :inherit org-modern-label
-       :background "gray40" :foreground "gray10"))
+  '((default :inherit org-modern-label :background "gray50")
+    (((background light))
+     :foreground "gray95")
+    (t :foreground "gray5"))
   "Face used for inactive time labels.")
 
 (defface org-modern-horizontal-rule



reply via email to

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