diff --git a/lisp/doom-ui.el b/lisp/doom-ui.el
index 903f24927..bb9ba8caa 100644
--- a/lisp/doom-ui.el
+++ b/lisp/doom-ui.el
@@ -585,8 +585,9 @@ windows, switch to `doom-fallback-buffer'. Otherwise, delegate to original
 Themes wouldn't call `provide-theme' unless they were a color-scheme, so treat
 them as such. Also intended as a helper for `doom--theme-is-colorscheme-p'."
   :after #'provide-theme
-  (with-memoization (plist-get (get theme 'theme-properties) :kind)
-    'color-scheme))
+  (or (plist-get (get theme 'theme-properties) :kind)
+      (cl-callf plist-put (get theme 'theme-properties) :kind
+                'color-scheme)))
 
 (defun doom--theme-is-colorscheme-p (theme)
   (unless (memq theme '(nil user changed use-package))