about summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/acdw-fonts.el14
1 files changed, 14 insertions, 0 deletions
diff --git a/lisp/acdw-fonts.el b/lisp/acdw-fonts.el index c4f16e8..6c0cb8d 100644 --- a/lisp/acdw-fonts.el +++ b/lisp/acdw-fonts.el
@@ -113,5 +113,19 @@ your variable size is 14, the computed relative size will be
113 113
114(add-hook 'buffer-face-mode-hook #'acdw-fonts/buffer-face-hook) 114(add-hook 'buffer-face-mode-hook #'acdw-fonts/buffer-face-hook)
115 115
116
117;;; Emoji fonts
118;; from https://old.reddit.com/r/emacs/comments/mvlid5/
119
120(defun acdw-fonts/setup-emoji-fonts (&rest emoji-fonts)
121 "For all EMOJI-FONTS that exist, add them to the symbol fontset.
122
123This is for emoji fonts."
124 (let ((ffl (font-family-list)))
125 (dolist (font emoji-fonts)
126 (when (member font ffl)
127 (set-fontset-font t 'symbol
128 (font-spec :family font) nil 'append)))))
129
116(provide 'acdw-fonts) 130(provide 'acdw-fonts)
117;;; acdw-fonts.el ends here 131;;; acdw-fonts.el ends here