From 7ffde2d9bb9165281be249f56d5b363447239ab7 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 31 Jan 2022 17:27:21 -0600
Subject: Changes

---
 init.el | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

(limited to 'init.el')

diff --git a/init.el b/init.el
index 99fdc6a..18ab4ea 100644
--- a/init.el
+++ b/init.el
@@ -649,7 +649,7 @@
            tab-bar-tab-name-ellipsis truncate-string-ellipsis
            tab-bar-show t
            tab-bar-close-button-show t
-           tab-bar-close-button (propertize " ◦ "
+           tab-bar-close-button (propertize " ✕ "
                                             'display t
                                             'close-tab t)
            tab-bar-new-button (propertize "+ " 'display t))
@@ -1444,7 +1444,8 @@ See also `crux-reopen-as-root-mode'."
                    :host github :repo "duckwork/machine.el"))
   (:option machine-default-font "DejaVu Sans Mono"
            machine-variable-pitch-font "DejaVu Sans")
-  (machine-settings-load))
+  (+with-ensure-after-init              ; So that they override anything here.
+   (machine-settings-load)))
 
 (setup (:straight macrostep)
   (:require macrostep)
@@ -1505,6 +1506,14 @@ See also `crux-reopen-as-root-mode'."
            modus-themes-bold-constructs t
            modus-themes-italic-constructs t
            modus-themes-headings '((t . (background))))
+  (dotimes (facen-1 8)
+    (let ((facen (1+ facen-1)))
+      (custom-set-faces
+       `(,(intern (format "org-level-%s" facen))
+         ((t :inherit
+             (,(intern (format "modus-themes-heading-%s" facen))
+              fixed-pitch))
+          :now)))))
   (dawn-schedule #'modus-themes-load-operandi
                  #'modus-themes-load-vivendi))
 
-- 
cgit 1.4.1-21-gabe81