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

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

[elpa] externals/org-modern dc19304f40 2/2: Add comments


From: ELPA Syncer
Subject: [elpa] externals/org-modern dc19304f40 2/2: Add comments
Date: Fri, 25 Mar 2022 11:57:38 -0400 (EDT)

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

    Add comments
---
 org-modern.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/org-modern.el b/org-modern.el
index e3f83f8089..86ed1f97f1 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -206,11 +206,13 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
   "Face used for done labels.")
 
 (defface org-modern-todo
+  ;; `:inverse-video' to use todo foreground as label background
   '((t :inherit (org-todo org-modern-label)
        :weight semibold :inverse-video t))
   "Face used for todo labels.")
 
 (defface org-modern-priority
+  ;; `:inverse-video' to use priority foreground as label background
   '((t :inherit (org-priority org-modern-label)
        :weight semibold :inverse-video t))
   "Face used for priority labels.")
@@ -224,6 +226,7 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
   "Face used for active date labels.")
 
 (defface org-modern-time-active
+  ;; Use `:distant-foreground' to ensure readability if `hl-line-mode' is used.
   '((default :inherit org-modern-label :weight semibold)
     (((background light))
      :background "gray35" :foreground "white" :distant-foreground "black")
@@ -238,6 +241,7 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
   "Face used for inactive date labels.")
 
 (defface org-modern-time-inactive
+  ;; Use `:distant-foreground' to ensure readability if `hl-line-mode' is used.
   '((default :inherit org-modern-label :background "gray50")
     (((background light)) :foreground "gray95" :distant-foreground "gray5")
     (t :foreground "gray5" :distant-foreground "gray95"))



reply via email to

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