Alternative Face

1. Better Default Font
2. Alternative Font for Missing Glyphs
3. Increase Readability by Default

1 files changed, 10 insertions, 9 deletions

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)