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

---
 machines/bob.el        | 10 ++++++++++
 machines/gnu-linux.el  |  5 +++++
 machines/windows-nt.el | 23 +++++++++++++++++++++++
 3 files changed, 38 insertions(+)
 create mode 100644 machines/bob.el
 create mode 100644 machines/gnu-linux.el
 create mode 100644 machines/windows-nt.el

(limited to 'machines')

diff --git a/machines/bob.el b/machines/bob.el
new file mode 100644
index 0000000..e9b444c
--- /dev/null
+++ b/machines/bob.el
@@ -0,0 +1,10 @@
+;;; bob.el --- Customizations for "bob" -*- lexical-binding: t; -*-
+
+;;; Commentary:
+
+;;; Code:
+
+(setq machine-default-font "DejaVu Sans Mono"
+      machine-default-height 105)
+
+;;; bob.el ends here
diff --git a/machines/gnu-linux.el b/machines/gnu-linux.el
new file mode 100644
index 0000000..309ca34
--- /dev/null
+++ b/machines/gnu-linux.el
@@ -0,0 +1,5 @@
+;;; linux.el -*- lexical-binding: t; -*-
+
+(setq machine-default-height 105)
+
+;;; linux.el ends here
diff --git a/machines/windows-nt.el b/machines/windows-nt.el
new file mode 100644
index 0000000..a95754e
--- /dev/null
+++ b/machines/windows-nt.el
@@ -0,0 +1,23 @@
+;;; windows.el --- Windows settings! -*- lexical-binding: t; -*-
+
+;; Annoying gnu-tls bug; I "always" trust the certificate anyway, so let's be
+;; insecure.
+(setq network-security-level 'low
+      debug-on-error t)
+
+;; Fonts
+
+(setq machine-default-font "Cascadia Mono"
+      machine-default-height 90
+      machine-variable-pitch-font "Carlito"
+      machine-variable-pitch-height 1.2)
+
+;; Add C:\Program Files\* and C:\Program Files (x86)\* to exec-path
+(dolist (path (append (file-expand-wildcards "C:/Program Files/*")
+                      (file-expand-wildcards "c:/Program Files (x86)/*")
+                      ;; Others...
+                      (save-match-data
+                        (split-string (getenv "PATH") ";" t))))
+  (add-to-list 'exec-path path :append))
+
+;;; windows.el ends here
-- 
cgit 1.4.1-21-gabe81