Apply font size changes on startup

This commit is contained in:
Gergely Polonkai 2019-02-04 10:27:01 +01:00
parent 23cb143ce7
commit 1cd9441a06
1 changed files with 8 additions and 11 deletions

View File

@ -1031,24 +1031,21 @@ Before this can be used, make sure the [[https://zhm.github.io/symbola/][Symbola
#+BEGIN_SRC emacs-lisp
(defun gpolonkai/set-font-size (frame)
(set-face-attribute 'default t :font "Hack-12")
(set-frame-font "Hack-12" t t))
(set-face-attribute 'default frame :font "Hack-12")
(set-frame-font "Hack-12" t frame))
(defun --set-emoji-font (frame)
"Adjust the font setting of FRAME so Emacs can display Emoji properly."
(when (fboundp 'set-fontset-font)
(if (eq system-type 'darwin)
;; For NS/Cocoa
(set-fontset-font t 'symbol
(font-spec :family "Apple Color Emoji")
frame 'prepend)
;; For Linux
(set-fontset-font t 'symbol
(font-spec :family "Symbola")
frame 'prepend))))
(set-fontset-font t 'symbol
(font-spec :family "Symbola")
frame 'prepend)))
(add-hook 'after-make-frame-functions 'gpolonkai/set-font-size)
(add-hook 'after-make-frame-functions '--set-emoji-font)
(gpolonkai/set-font-size nil)
(--set-emoji-font nil)
#+END_SRC
* Set up global minor modes provided by Emacs