From 56fd345c2e2abbf9e9a48e2b22df4851082c80fd Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Mon, 3 Oct 2022 18:04:54 +0200
Subject: Emacs: fix mismatching ivy faces when switching dark/light modes

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

diff --git a/user/emacs/init.el b/user/emacs/init.el
index 858aa98a..5ee80ad6 100644
--- a/user/emacs/init.el
+++ b/user/emacs/init.el
@@ -77,9 +77,9 @@
                 (defun my/set-dark-or-light-theme ()
                   (let ((appearance (plist-get (mac-application-state) :appearance)))
                     (cond ((equal appearance "NSAppearanceNameAqua")
-                           (load-theme light-mode-theme t))
+                           (counsel-load-theme light-mode-theme t))
                           ((equal appearance "NSAppearanceNameDarkAqua")
-                           (load-theme dark-mode-theme t)))))
+                           (counsel-load-theme dark-mode-theme t)))))
                 (add-hook 'mac-effective-appearance-change-hook #'my/set-dark-or-light-theme)
                 (if (boundp 'mac-effective-appearance-change-hook)
                     (my/set-dark-or-light-theme)
@@ -253,6 +253,7 @@ _p_rev       _u_pper              _=_: upper/lower       _r_esolve
   :config (setq amx-history-length 100))
 
 (use-package counsel
+  :functions (counsel-load-theme)
   :commands (counsel-unicode-char)
   :general ("M-x" #'counsel-M-x))
 
-- 
cgit 1.4.1