[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…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user