[Emacs] Set font for main server AND new frames
This commit is contained in:
parent
6bf56bbce3
commit
dd4bd72d70
@ -422,12 +422,14 @@ don’t. 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
|
||||
|
Loading…
Reference in New Issue
Block a user