[nongnu] elpa/spacemacs-theme 6c74d12a03 179/336: Fix (#62) add custom var org agenda height

[ELPA Syncer]

branch: elpa/spacemacs-theme
commit 6c74d12a037bcc4afe380c23a333d4c740020731
Author: nashamri <designernasser@gmail.com>
Commit: nashamri <designernasser@gmail.com>

    Fix (#62) add custom var org agenda height
---
 README.md           |  4 ++++
 spacemacs-common.el | 11 ++++++++---
 2 files changed, 12 insertions(+), 3 deletions(-)

diff --git a/README.md b/README.md
index 02fb9d810a..c19ebd1490 100644
--- a/README.md
+++ b/README.md
@@ -50,6 +50,10 @@ The theme has some options that can be tweaked via `M-x 
customize`:
 
 This toggles a background color for the comment lines.
 
+* `spacemacs-theme-org-agenda-height`:
+
+This toggles the use of varying org agenda heights.
+
 * `spacemacs-theme-org-height`:
 
 This toggles the use of varying org headings heights.
diff --git a/spacemacs-common.el b/spacemacs-common.el
index 0faec82221..dd940fc3e4 100644
--- a/spacemacs-common.el
+++ b/spacemacs-common.el
@@ -46,6 +46,11 @@
   :type 'boolean
   :group 'spacemacs-theme)
 
+(defcustom spacemacs-theme-org-agenda-height t
+  "Use varying text heights for org agenda."
+  :type 'boolean
+  :group 'spacemacs-theme)
+
 (defcustom spacemacs-theme-org-height t
   "Use varying text heights for org headings."
   :type 'boolean
@@ -539,10 +544,10 @@
 
 ;;;;; org
      `(org-agenda-clocking ((,class (:background ,highlight :foreground 
,comp))))
-     `(org-agenda-date ((,class (:foreground ,var :height ,(if 
spacemacs-theme-org-height 1.1 1.0)))))
-     `(org-agenda-date-today ((,class (:foreground ,keyword :slant italic 
:inherit bold :height ,(if spacemacs-theme-org-height 1.3 1.0)))))
+     `(org-agenda-date ((,class (:foreground ,var :height ,(if 
spacemacs-theme-org-agenda-height 1.1 1.0)))))
+     `(org-agenda-date-today ((,class (:foreground ,keyword :inherit bold 
:height ,(if spacemacs-theme-org-agenda-height 1.3 1.0)))))
      `(org-agenda-date-weekend ((,class (:inherit bold :foreground ,var))))
-     `(org-agenda-done ((,class (:foreground ,suc :height ,(if 
spacemacs-theme-org-height 1.2 1.0)))))
+     `(org-agenda-done ((,class (:foreground ,suc :height ,(if 
spacemacs-theme-org-agenda-height 1.2 1.0)))))
      `(org-agenda-structure ((,class (:inherit bold :foreground ,comp))))
      `(org-block ((,class (:background ,cblk-bg :foreground ,cblk))))
      `(org-block-begin-line ((,class (:background ,cblk-ln-bg :foreground 
,cblk-ln))))