From cb680cb5478185b7641fd3ca63a0ac417001286a Mon Sep 17 00:00:00 2001 From: Christian Cunningham Date: Mon, 8 Jul 2024 21:09:55 -0700 Subject: Alternative Face 1. Better Default Font 2. Alternative Font for Missing Glyphs 3. Increase Readability by Default --- elchemy-user.el | 19 ++++++++++--------- 1 file changed, 10 insertions(+), 9 deletions(-) (limited to 'elchemy-user.el') diff --git a/elchemy-user.el b/elchemy-user.el index 669d7ca..b4e6eef 100644 --- a/elchemy-user.el +++ b/elchemy-user.el @@ -22,11 +22,12 @@ (setq completion-at-point-functions '(elisp-completion-at-point comint-dynamic-complete-filename t)) ;; User Options -(setq elchemy/user/dark-theme t +(setq elchemy/user/dark-theme nil elchemy/user/light-theme nil elchemy/user/transparency 100 - elchemy/user/font-height 120 - elchemy/user/font-name "Andale Mono" + elchemy/user/font-height 160 + elchemy/user/font-name "azuki_font" + elchemy/user/alt-font-name "Source Code Pro" elchemy/user/use-meow nil elchemy/user/latex-compiler "lualatex" elchemy/user/org-directory "~/org/" @@ -39,17 +40,17 @@ elchemy/dashboard-agenda-titles '(#("TODO" 0 4 (fontify t face (:foreground "red"))) #("STRT" 0 4 (fontify t face (:foreground "dark cyan"))) #("WAIT" 0 4 (fontify t face (:foreground "orange"))) - #("CYCL" 0 4 (fontify t face (:foreground "silver")))) + #("CYCL" 0 4 (fontify t face (:foreground "gray50")))) elchemy/schedule-lookahead 7) ;; Modeline -(setq-default mode-line-format '(" 🧪 " - (:propertize "ELCHEMY" face (:weight bold)) - " 🧬 " +(setq-default mode-line-format `((:propertize " ♥ " face (:family ,elchemy/user/alt-font-name)) + (:propertize "PlayTime" face (:weight bold)) + (:propertize " ♦ " face (:family ,elchemy/user/alt-font-name)) (:propertize "%b" face (:slant italic)) - " ︎🦠 " + (:propertize " ♣ " face (:family ,elchemy/user/alt-font-name)) (:propertize (:eval mode-name) face (:foreground "red")) - " 🧫 ")) + (:propertize " ♠ " face (:family ,elchemy/user/alt-font-name)))) ;; Ignore Bell (setq ring-bell-function 'ignore) -- cgit v1.2.1