From 112ef458a3f3afa1ce2714c884aefaba9dfe4d2f Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Tue, 7 Mar 2023 20:41:13 +0100
Subject: Emacs: speedup modus theme toggling

---
 user/emacs/init.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'user')

diff --git a/user/emacs/init.el b/user/emacs/init.el
index f6d3b129..f03c5ffc 100644
--- a/user/emacs/init.el
+++ b/user/emacs/init.el
@@ -80,13 +80,13 @@
                   (let ((appearance (plist-get (mac-application-state) :appearance)))
                     (mapc #'disable-theme custom-enabled-themes)
                     (cond ((equal appearance "NSAppearanceNameAqua")
-                           (load-theme light-mode-theme t))
+                           (enable-theme light-mode-theme))
                           ((equal appearance "NSAppearanceNameDarkAqua")
-                           (load-theme dark-mode-theme t)))))
+                           (enable-theme dark-mode-theme)))))
                 (add-hook 'mac-effective-appearance-change-hook #'my/set-dark-or-light-theme)
                 (if (fboundp #'mac-application-state)
                     (my/set-dark-or-light-theme)
-                  (load-theme light-mode-theme t)))))
+                  (enable-theme light-mode-theme)))))
   (if (eq window-system 'x)
       (setq-default line-spacing 0.2))
   (setq frame-background-mode 'light)
-- 
cgit 1.4.1