[Emacs] Set font for main server AND new frames

This commit is contained in:
Lucien Cartier-Tilet 2022-02-11 11:12:23 +01:00
parent 6bf56bbce3
commit dd4bd72d70
Signed by: phundrak
GPG Key ID: BD7789E705CB8DCA
1 changed files with 8 additions and 6 deletions

View File

@ -422,12 +422,14 @@ dont. I prefer [[https://github.com/microsoft/cascadia-code][Cascadia Code]],
(defvar phundrak/default-font-name "Cascadia Code"
"Default font.")
(add-hook 'server-after-make-frame-hook
(lambda ()
(when (find-font (font-spec :name phundrak/default-font-name))
(set-face-attribute 'default nil
:font phundrak/default-font-name
:height phundrak/default-font-size))))
(defun my/set-font ()
(when (find-font (font-spec :name phundrak/default-font-name))
(set-face-attribute 'default nil
:font phundrak/default-font-name
:height phundrak/default-font-size)))
(my/set-font)
(add-hook 'server-after-make-frame-hook #'my/set-font)
#+end_src
*** Frame Title