From 2b99cc25d369f6192b78863fec450e55b9d15d4a Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Fri, 21 Jan 2022 16:40:25 -0600
Subject: Change system to machine

---
 early-init.el | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

(limited to 'early-init.el')

diff --git a/early-init.el b/early-init.el
index c379934..2569602 100644
--- a/early-init.el
+++ b/early-init.el
@@ -54,10 +54,10 @@ See `no-littering' for examples.")
   "My Syncthing directory.")
 
 ;; Load system-specific changes.
-(progn (require 'system)
-       (setq system-default-font "DejaVu Sans Mono"
-             system-variable-pitch-font "DejaVu Sans")
-       (system-settings-load))
+;; (progn (require 'system)
+;;        (setq system-default-font "DejaVu Sans Mono"
+;;              system-variable-pitch-font "DejaVu Sans")
+;;        (system-settings-load))
 
 ;;; Default frame settings
 
@@ -77,11 +77,11 @@ See `no-littering' for examples.")
 (+with-ensure-after-init
   ;; Set default faces
   (+with-message "Setting default faces"
-    (let ((font-name system-default-font)
-          (font-size system-default-height)
-          (variable-font-name system-variable-pitch-font)
-          (variable-font-size system-variable-pitch-height))
-      (set-face-attribute 'default nil :family system-default-font
+    (let ((font-name machine-default-font)
+          (font-size machine-default-height)
+          (variable-font-name machine-variable-pitch-font)
+          (variable-font-size machine-variable-pitch-height))
+      (set-face-attribute 'default nil :family font-name
                           :height font-size :weight 'book)
       (set-face-attribute 'italic nil :family font-name
                           :height font-size :slant 'italic)
-- 
cgit 1.4.1-21-gabe81