branch: elpa/alect-themes
commit 094d3618593c314046dc5f80cb3924e9fdfd6e0a
Author: Alex Kost <[email protected]>
Commit: Alex Kost <[email protected]>
Preserve the structure of `alect-overriding-faces'
Function `alect-substitute-colors-in-faces' is destructive.
---
alect-themes.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/alect-themes.el b/alect-themes.el
index f560b1d..e5f5a25 100644
--- a/alect-themes.el
+++ b/alect-themes.el
@@ -1291,7 +1291,7 @@ For INVERT, see `alect-get-color'."
(theme-faces (alect-override-faces
(car theme-vals)
(alect-substitute-colors-in-faces
- theme alect-overriding-faces)))
+ theme (copy-tree alect-overriding-faces))))
(theme-vars (cdr theme-vals)))
;; FIXME is there a way to avoid this?: variables are not set with
;; `custom-theme-set-variables' if they have not been defined yet
