diff options
author | jao <jao@gnu.org> | 2022-04-08 01:58:02 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2022-04-08 01:58:02 +0100 |
commit | 4c24dbcef8d5f960383351ba92f3c0bc6f6ad4af (patch) | |
tree | 60800471eebe1616a9e1a0e12b5020f49572da7d /init.org | |
parent | 9c4ebd2cb488f908deb76bddad5ccc1e44a2da8f (diff) | |
download | elibs-4c24dbcef8d5f960383351ba92f3c0bc6f6ad4af.tar.gz elibs-4c24dbcef8d5f960383351ba92f3c0bc6f6ad4af.tar.bz2 |
set-fontset-font calls fixed
Diffstat (limited to 'init.org')
-rw-r--r-- | init.org | 27 |
1 files changed, 15 insertions, 12 deletions
@@ -296,20 +296,23 @@ See [[https://emacs.stackexchange.com/questions/251/line-height-with-unicode-characters/5386#5386][fonts - Line height with unicode characters]] for a good discussion. #+begin_src emacs-lisp - (defun jao--set-fontsets (f) - (set-fontset-font t 64257 "Quivira" f) - (set-fontset-font t 'egyptian "Noto Sans Egyptian Hieroglyphs" f) - (set-fontset-font t 'hangul "NanumGothicCoding" f) - (set-fontset-font t 'unicode (face-attribute 'default :family) f) - (set-fontset-font t 'unicode-bmp (face-attribute 'default :family) f) - (set-fontset-font t 'symbol "Symbola-10" f) - (set-fontset-font t 'greek "GFS Didot" f) - (set-fontset-font t 'mathematical "FreeSerif" f) - (set-fontset-font t 'emoji "Noto Color Emoji" f) + (defun jao--set-fontsets (_f) + (set-fontset-font t 64257 "Quivira" nil 'prepend) + (set-fontset-font t 'egyptian "Noto Sans Egyptian Hieroglyphs" + nil 'prepend) + (set-fontset-font t 'hangul "NanumGothicCoding" nil 'prepend) + (set-fontset-font t 'unicode (face-attribute 'default :family) + nil 'prependf) + (set-fontset-font t 'unicode-bmp (face-attribute 'default :family) + nil 'prependf) + (set-fontset-font t 'symbol "Symbola-10" nil 'prepend) + (set-fontset-font t 'greek "GFS Didot" nil 'prepend) + (set-fontset-font t 'mathematical "FreeSerif" nil 'prepend) + (set-fontset-font t 'emoji "Noto Color Emoji" nil 'prepend) ;; boxes - (set-fontset-font t '(9472 . 9599) "Source Code Pro" f) + (set-fontset-font t '(9472 . 9599) "Source Code Pro" nil 'prepend) ;; variation selector-16 - (set-fontset-font t 65039 "BabelStone Modern-1" f)) + (set-fontset-font t 65039 "BabelStone Modern-1" nil 'prepend)) (jao--set-fontsets nil) (add-to-list 'after-make-frame-functions 'jao--set-fontsets) |