diff --git a/ha-display.org b/ha-display.org
index 2df35b9..7b702a8 100644
--- a/ha-display.org
+++ b/ha-display.org
@@ -219,9 +219,17 @@ I probably don't need to have such a ranking system, as chances are good I have
         (seq-filter (lambda (font) (when (x-list-fonts font) font))
                     '(;  Interesting idea: "Iosevka Comfy Motion Duo"
                       "XCharter" ; https://fontesk.com/xcharter-typeface/
-                      "Overpass" "Source Sans Pro"
-                      "Lucida Grande" "Verdana"
-                      "Sans Serif")))
+                      "Serif")))
+       (warn "Cannot find a Serif Font.  Install Source Sans Pro."))))
+
+  (defvar ha-variable-header-font
+    (when window-system
+      (or
+       (seq-first
+        (seq-filter (lambda (font) (when (x-list-fonts font) font))
+                    '("Overpass" "Source Sans Pro"
+                     "Lucida Grande" "Verdana"
+                     "Sans Serif")))
        (warn "Cannot find a Sans Serif Font.  Install Source Sans Pro."))))
 #+end_src
 
diff --git a/ha-org-word-processor.org b/ha-org-word-processor.org
index 701776d..483f06d 100644
--- a/ha-org-word-processor.org
+++ b/ha-org-word-processor.org
@@ -190,7 +190,8 @@ First step is to make all Org header levels to use the variable font, and be the
     (let ((default-color (face-attribute 'default :foreground)))
       (dolist (face '(org-level-1 org-level-2 org-level-3 org-level-4 org-level-5 org-level-6 org-level-7 org-level-8))
         (set-face-attribute face nil :height 1.1
-                            :foreground default-color :weight 'bold :font ha-variable-font))))
+                            :foreground default-color :weight 'bold
+                            :font ha-variable-header-font))))
 #+end_src
 
 Next, we just need to change the header sizes: