From 311ad23fd410f976f66c40f98e26aa7ee2dda8c3 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Mon, 13 Jan 2025 12:36:05 -0500 Subject: [PATCH] fix: void-function (setf plist-get) error Only affected users on Emacs 27, before a generalized setter was defined for `plist-get`. Amend: 50b9afbb2d80 --- lisp/doom-ui.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) 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))