branch: elpa/spacemacs-theme
commit 3e1768ec49f0d5e58a66d7a9238a4adb4e9e43b6
Merge: 63ff8476a8 fd3ac0a4be
Author: Nasser Alshammari <[email protected]>
Commit: GitHub <[email protected]>
Merge pull request #120 from is-r-not-j/master
Added support to customise bold headings of org levels and priority
---
spacemacs-common.el | 16 +++++++++++++---
1 file changed, 13 insertions(+), 3 deletions(-)
diff --git a/spacemacs-common.el b/spacemacs-common.el
index d2d5d76f1d..d0bac75d55 100644
--- a/spacemacs-common.el
+++ b/spacemacs-common.el
@@ -70,6 +70,16 @@ to 'auto, tags may not be properly aligned. "
:type 'boolean
:group 'spacemacs-theme)
+(defcustom spacemacs-theme-org-bold t
+ "Inherit text bold for org headings"
+ :type 'boolean
+ :group 'spacemacs-theme)
+
+(defcustom spacemacs-theme-org-priority-bold t
+ "Inherit text bold for priority items in agenda view"
+ :type 'boolean
+ :group 'spacemacs-theme)
+
(defcustom spacemacs-theme-org-highlight nil
"Highlight org headings."
:type 'boolean
@@ -719,8 +729,8 @@ to 'auto, tags may not be properly aligned. "
`(org-footnote ((,class (:underline t :foreground ,base))))
`(org-hide ((,class (:foreground ,base))))
`(org-kbd ((,class (:inherit region :foreground ,base :box (:line-width 1
:style released-button)))))
- `(org-level-1 ((,class (:inherit bold :foreground ,head1 :height ,(if
spacemacs-theme-org-height 1.3 1.0) :background ,(when
spacemacs-theme-org-highlight head1-bg)))))
- `(org-level-2 ((,class (:inherit bold :foreground ,head2 :height ,(if
spacemacs-theme-org-height 1.2 1.0) :background ,(when
spacemacs-theme-org-highlight head2-bg)))))
+ `(org-level-1 ((,class (:inherit bold :bold ,(if spacemacs-theme-org-bold
'unspecified nil) :foreground ,head1 :height ,(if spacemacs-theme-org-height
1.3 1.0) :background ,(when spacemacs-theme-org-highlight head1-bg)))))
+ `(org-level-2 ((,class (:inherit bold :bold ,(if spacemacs-theme-org-bold
'unspecified nil) :foreground ,head2 :height ,(if spacemacs-theme-org-height
1.2 1.0) :background ,(when spacemacs-theme-org-highlight head2-bg)))))
`(org-level-3 ((,class (:bold nil :foreground ,head3 :height ,(if
spacemacs-theme-org-height 1.1 1.0) :background ,(when
spacemacs-theme-org-highlight head3-bg)))))
`(org-level-4 ((,class (:bold nil :foreground ,head4 :background ,(when
spacemacs-theme-org-highlight head4-bg)))))
`(org-level-5 ((,class (:bold nil :foreground ,head1))))
@@ -730,7 +740,7 @@ to 'auto, tags may not be properly aligned. "
`(org-link ((,class (:underline t :foreground ,comment))))
`(org-meta-line ((,class (:foreground ,meta))))
`(org-mode-line-clock-overrun ((,class (:foreground ,err))))
- `(org-priority ((,class (:foreground ,war :inherit bold))))
+ `(org-priority ((,class (:foreground ,war :inherit bold :bold ,(if
spacemacs-theme-org-priority-bold 'unspecified nil)))))
`(org-quote ((,class (:inherit org-block :slant italic))))
`(org-scheduled ((,class (:foreground ,comp))))
`(org-scheduled-today ((,class (:foreground ,func :height ,(if
spacemacs-theme-org-agenda-height 1.2 1.0)))))
