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

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

[elpa] externals/ef-themes 4e19f43eaf 2/2: Revise Org agenda date and st


From: ELPA Syncer
Subject: [elpa] externals/ef-themes 4e19f43eaf 2/2: Revise Org agenda date and structure headings
Date: Thu, 1 Dec 2022 12:57:34 -0500 (EST)

branch: externals/ef-themes
commit 4e19f43eaf4f1e2b07536e88bab36a6bd4ec128b
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Revise Org agenda date and structure headings
    
    * Date headings have the same foreground as all other dates.
    
    * Weekends use a distinct foreground.  This is common with physical
      calendars and calendar apps.  We also use the same style for the M-x
      calendar.
    
    * The structure headings use a more appropriate foreground.
    
    * Date headings are now considered "level 2" headings NOT "level 1".
      This changes how the user option 'ef-themes-headings' affects the
      agenda buffer.  The idea is that users often set level 1 headings to
      a greater height value for prose.  Whereas the agenda dates don't
      really need that sort of emphasis.
---
 ef-themes.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/ef-themes.el b/ef-themes.el
index e029dab717..a332e57c75 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -1575,10 +1575,10 @@ Helper function for `ef-themes-preview-colors'."
     `(org-agenda-clocking ((,c :background ,bg-warning :foreground ,warning)))
     `(org-agenda-column-dateline ((,c :background ,bg-alt)))
     `(org-agenda-current-time ((,c :foreground ,fg-main)))
-    `(org-agenda-date ((,c :inherit ef-themes-heading-1)))
+    `(org-agenda-date ((,c :inherit ef-themes-heading-2 :foreground ,date)))
     `(org-agenda-date-today ((,c :inherit org-agenda-date :underline t)))
-    `(org-agenda-date-weekend ((,c :inherit org-agenda-date)))
-    `(org-agenda-date-weekend-today ((,c :inherit org-agenda-date-today)))
+    `(org-agenda-date-weekend ((,c :inherit org-agenda-date :foreground ,err)))
+    `(org-agenda-date-weekend-today ((,c :inherit org-agenda-date-today 
:foreground ,err)))
     `(org-agenda-diary ((,c :inherit org-agenda-calendar-sexp)))
     `(org-agenda-dimmed-todo-face ((,c :inherit shadow)))
     `(org-agenda-done ((,c :inherit success)))
@@ -1587,9 +1587,9 @@ Helper function for `ef-themes-preview-colors'."
     `(org-agenda-filter-regexp ((,c :inherit bold :foreground ,modeline-err)))
     `(org-agenda-filter-tags ((,c :inherit bold :foreground ,modeline-err)))
     `(org-agenda-restriction-lock ((,c :background ,bg-dim :foreground 
,fg-dim)))
-    `(org-agenda-structure ((,c :inherit ef-themes-heading-0)))
-    `(org-agenda-structure-filter ((,c :inherit org-agenda-structure 
:foreground ,rainbow-1)))
-    `(org-agenda-structure-secondary ((,c :foreground ,rainbow-1)))
+    `(org-agenda-structure ((,c :inherit ef-themes-heading-0 :foreground 
,fg-alt)))
+    `(org-agenda-structure-filter ((,c :inherit org-agenda-structure 
:foreground ,warning)))
+    `(org-agenda-structure-secondary ((,c :inherit font-lock-doc-face)))
     `(org-archived ((,c :background ,bg-alt :foreground ,fg-main)))
     `(org-block ((,c :inherit ef-themes-fixed-pitch :background ,bg-inactive 
:extend t)))
     `(org-block-begin-line ((,c :inherit (shadow ef-themes-fixed-pitch) 
:background ,bg-dim :extend t)))



reply via email to

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