From b723eb988f27f0420ee6c28b72a5e7c28f68956d Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Fri, 30 Apr 2021 12:50:33 -0500
Subject: Move emoji font configuration to the initial frame setup function

---
 lisp/acdw-fonts.el | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

(limited to 'lisp')

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
 
 (add-hook 'buffer-face-mode-hook #'acdw-fonts/buffer-face-hook)
 
+
+;;; Emoji fonts
+;; from https://old.reddit.com/r/emacs/comments/mvlid5/
+
+(defun acdw-fonts/setup-emoji-fonts (&rest emoji-fonts)
+  "For all EMOJI-FONTS that exist, add them to the symbol fontset.
+
+This is for emoji fonts."
+  (let ((ffl (font-family-list)))
+    (dolist (font emoji-fonts)
+      (when (member font ffl)
+        (set-fontset-font t 'symbol
+                          (font-spec :family font) nil 'append)))))
+
 (provide 'acdw-fonts)
 ;;; acdw-fonts.el ends here
-- 
cgit 1.4.1-21-gabe81