diff --git a/lisp/mitch-defuns.el b/lisp/mitch-defuns.el
index b8324db..c47fe0b 100644
--- a/lisp/mitch-defuns.el
+++ b/lisp/mitch-defuns.el
@@ -71,7 +71,18 @@ console."
   (setq use-dialog-box nil)
   ;; Pixel scrolling. Only in emacs 29+...
   (if (>= (string-to-number emacs-version) 29)
-      (pixel-scroll-precision-mode t)))
+      (pixel-scroll-precision-mode t)
+    (pixel-scroll-mode t))
+  ;; Size of text. お前 わ 毛 しんでる.
+  (if (eq system-type 'gnu/linux)
+      (progn
+	(set-face-attribute 'fixed-pitch nil :height 130)
+	(set-face-attribute 'default nil :height 130)
+	(set-face-attribute 'variable-pitch nil :height 140))
+    (progn
+      (set-face-attribute 'fixed-pitch nil :height 100)
+      (set-face-attribute 'default nil :height 100)
+      (set-face-attribute 'variable-pitch nil :height 110))))
 
 (defun toggle-ja-input ()
   "Switch between english and japanese.  Broken."
diff --git a/lisp/mitch-theme.el b/lisp/mitch-theme.el
index 20683d6..b0aa17d 100644
--- a/lisp/mitch-theme.el
+++ b/lisp/mitch-theme.el
@@ -38,14 +38,11 @@
 
 ;; sane font stuff
 (set-face-attribute 'fixed-pitch nil
-		    :family "MesloLGS NF"
-		    :height 130)
+		    :family "MesloLGS NF")
 (set-face-attribute 'default nil
-		    :family "MesloLGS NF"
-		    :height 130)
+		    :family "MesloLGS NF")
 (set-face-attribute 'variable-pitch nil
 		    :inherit 'default
-		    :height 140
 		    :family "Sans Serif")
 
 (setq rainbow-delimiters-max-face-count 2)