[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"
|
(defvar phundrak/default-font-name "Cascadia Code"
|
||||||
"Default font.")
|
"Default font.")
|
||||||
|
|
||||||
(add-hook 'server-after-make-frame-hook
|
(defun my/set-font ()
|
||||||
(lambda ()
|
(when (find-font (font-spec :name phundrak/default-font-name))
|
||||||
(when (find-font (font-spec :name phundrak/default-font-name))
|
(set-face-attribute 'default nil
|
||||||
(set-face-attribute 'default nil
|
:font phundrak/default-font-name
|
||||||
:font phundrak/default-font-name
|
:height phundrak/default-font-size)))
|
||||||
:height phundrak/default-font-size))))
|
|
||||||
|
(my/set-font)
|
||||||
|
(add-hook 'server-after-make-frame-hook #'my/set-font)
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
*** Frame Title
|
*** Frame Title
|
||||||
|
Loading…
Reference in New Issue
Block a user