From 0134c5908efec242c81e051dcd70dde8bfd95da9 Mon Sep 17 00:00:00 2001 From: mattkae Date: Thu, 10 Nov 2022 21:33:02 -0500 Subject: Fixing org mode bullets --- lisp/org-custom.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'lisp/org-custom.el') diff --git a/lisp/org-custom.el b/lisp/org-custom.el index 5b13174..f00924d 100644 --- a/lisp/org-custom.el +++ b/lisp/org-custom.el @@ -10,8 +10,7 @@ (0 (prog1 () (compose-region (match-beginning 1) (match-end 1) "•")))))) (let* ((variable-tuple - (cond ((x-list-fonts "ETBembo") '(:font "ETBembo")) - ((x-list-fonts "Source Sans Pro") '(:font "Source Sans Pro")) + (cond ((x-list-fonts "Source Sans Pro") '(:font "Source Sans Pro")) ((x-list-fonts "Lucida Grande") '(:font "Lucida Grande")) ((x-list-fonts "Verdana") '(:font "Verdana")) ((x-family-fonts "Sans Serif") '(:family "Sans Serif")) @@ -25,10 +24,10 @@ `(org-level-7 ((t (,@headline ,@variable-tuple)))) `(org-level-6 ((t (,@headline ,@variable-tuple)))) `(org-level-5 ((t (,@headline ,@variable-tuple)))) - `(org-level-4 ((t (,@headline ,@variable-tuple :height 0.8)))) - `(org-level-3 ((t (,@headline ,@variable-tuple :height 0.9)))) - `(org-level-2 ((t (,@headline ,@variable-tuple :height 1.0 :weight bold)))) - `(org-level-1 ((t (,@headline ,@variable-tuple :height 1.2 :weight bold)))) + `(org-level-4 ((t (,@headline ,@variable-tuple :height 1.0)))) + `(org-level-3 ((t (,@headline ,@variable-tuple :height 1.1)))) + `(org-level-2 ((t (,@headline ,@variable-tuple :height 1.3 :weight bold)))) + `(org-level-1 ((t (,@headline ,@variable-tuple :height 1.5 :weight bold)))) `(org-document-title ((t (,@headline ,@variable-tuple :height 1.3 :weight:bold)))))) (custom-theme-set-faces @@ -37,7 +36,8 @@ '(org-code ((t (:inherit (shadow fixed-pitch))))) '(org-document-info ((t (:foreground "dark orange")))) '(org-document-info-keyword ((t (:inherit (shadow fixed-pitch))))) - '(org-link ((t (:foreground "royalblue" :underline t)))) + '(org-indent ((t (:inherit (org-hide fixed-pitch))))) + '(org-link ((t (:foreground "royal blue" :underline t)))) '(org-meta-line ((t (:inherit (font-lock-comment-face fixed-pitch))))) '(org-property-value ((t (:inherit fixed-pitch))) t) '(org-special-keyword ((t (:inherit (font-lock-comment-face fixed-pitch))))) -- cgit v1.2.1