xiudi/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

refactor: Improve font setup with broader coverage and correct initialization

Browse Source
This commit is contained in:
lemyx (aider) 2024-12-29 15:02:58 +08:00
parent b3385fa468
commit 39bd9c939d
1 changed files with 5 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lisp/init-font.el
View File

@ -10,14 +10,12 @@
(english-font-name "Sarasa Term SC Nerd") (english-font-name "Sarasa Term SC Nerd")
(font-spec-english (font-spec :family english-font-name :size emacs-font-size)) (font-spec-english (font-spec :family english-font-name :size emacs-font-size))
(font-spec-chinese (font-spec :family chinese-font-name :size emacs-font-size))) (font-spec-chinese (font-spec :family chinese-font-name :size emacs-font-size)))
(when (display-grayscale-p) (set-fontset-font (frame-parameter nil 'font) 'unicode-bmp font-spec-english)
(set-frame-font font-spec-english) (dolist (charset '(kana han symbol cjk-misc bopomofo))
(set-fontset-font (frame-parameter nil 'font) 'unicode font-spec-english) (set-fontset-font (frame-parameter nil 'font) charset font-spec-chinese))
(dolist (charset '(kana han symbol cjk-misc bopomofo)) (set-frame-font font-spec-english)))
(set-fontset-font (frame-parameter nil 'font) charset font-spec-chinese)))
))
(load-font-setup) (add-hook 'after-init-hook #'load-font-setup)
;; This is hacking to fix Emacs 29 will decrease font after standby. ;; This is hacking to fix Emacs 29 will decrease font after standby.
(add-function :after after-focus-change-function #'load-font-setup) (add-function :after after-focus-change-function #'load-font-setup)