update font handling so atkinson hyperlegible is the default variable font and mono lisa is the default fixed width font ; add sytling to org to leverage both
This commit is contained in:
parent
2cc8e02e31
commit
e05cd09a53
|
@ -274,6 +274,30 @@ position between last non-whitespace and `end-of-line'."
|
|||
;; http://ergoemacs.org/misc/emacs_macos_emoji.html
|
||||
;;
|
||||
)
|
||||
|
||||
(custom-theme-set-faces
|
||||
'user
|
||||
'(variable-pitch ((t (:family "Atkinson Hyperlegible"))))
|
||||
'(fixed-pitch ((t ( :family "MonoLisa Variable"))))
|
||||
)
|
||||
|
||||
(custom-theme-set-faces
|
||||
'user
|
||||
'(org-block ((t (:inherit fixed-pitch))))
|
||||
'(org-code ((t (:inherit (fixed-pitch)))))
|
||||
'(org-document-info ((t (:inherit (fixed-pitch)))))
|
||||
'(org-document-info-keyword ((t (:inherit (fixed-pitch)))))
|
||||
'(org-link ((t (:inherit (fixed-pitch)))))
|
||||
'(org-meta-line ((t (:inherit (fixed-pitch)))))
|
||||
'(org-property-value ((t (:inherit (fixed-pitch)))))
|
||||
'(org-verbatim ((t (:inherit (fixed-pitch)))))
|
||||
'(org-tag ((t (:inherit (fixed-pitch)))))
|
||||
'(line-number ((t (:inherit (fixed-pitch)))))
|
||||
'(line-number-current-line ((t (:inherit (fixed-pitch)))))
|
||||
)
|
||||
|
||||
(add-hook 'org-mode-hook 'variable-pitch-mode)
|
||||
|
||||
)
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
|
Reference in a new issue