Set new fonts

1 files changed, 26 insertions, 3 deletions

diff --git a/emacs/.config/emacs-kj/init.el b/emacs/.config/emacs-kj/init.el
index bc40e6c..f696efe 100644
--- a/emacs/.config/emacs-kj/init.el
+++ b/emacs/.config/emacs-kj/init.el
@@ -27,9 +27,9 @@
 (use-package straight
   :custom (straight-use-package-by-default t))
 
-(let ((my-font "Iosevka-18"))
-  (set-face-attribute 'default t :font my-font)
-  (set-frame-font my-font))
+;; (let ((my-font "Iosevka-18"))
+;;   (set-face-attribute 'default t :font my-font)
+;;   (set-frame-font my-font))
 (set-default-coding-systems 'utf-8)
 
 ;; Backup file settings.
@@ -317,6 +317,29 @@
   (setq org-confirm-babel-evaluate nil)
   (require 'org-tempo))
 
+(use-package mixed-pitch
+  ;; :hook
+  ;;(text-mode . mixed-pitch-mode)
+  ;;(org-mode . mixed-pitch-mode)
+  )
+
+(set-face-attribute 'default nil :font "Noto Serif" :height 150)
+(set-face-attribute 'fixed-pitch nil :font "Iosevka" :height 180)
+(set-face-attribute 'variable-pitch nil :font "Noto Serif")
+
+(defun kj/set-fixed-pitch ()
+  (interactive)
+  (setq buffer-face-mode-face 'fixed-pitch)
+  (buffer-face-mode +1))
+
+(defun kj/org-pitch ()
+  (interactive)
+  (kj/set-fixed-pitch)
+  (mixed-pitch-mode +1))
+
+(add-hook 'eshell-mode-hook #'kj/set-fixed-pitch)
+(add-hook 'org-mode-hook #'kj/org-pitch)
+
 (use-package ob-async)
 
 (use-package direnv