[nongnu] elpa/autothemer add7d430e0 13/21: call deftheme before evaluating BODY

[ELPA Syncer]

branch: elpa/autothemer
commit add7d430e0be2f4cd7ccc622f8fbc8bc44be762f
Author: Sebastian Sturm <mail@sebastian-sturm.de>
Commit: Sebastian Sturm <mail@sebastian-sturm.de>

    call deftheme before evaluating BODY
---
 autothemer.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/autothemer.el b/autothemer.el
index 6c3ffaf462..6bbd270648 100644
--- a/autothemer.el
+++ b/autothemer.el
@@ -66,6 +66,7 @@ bindings within both the REDUCED-SPECS and the BODY."
     (setq face-customizer
           `(let ((,face-specs)
                  (,temp-defined-colors))
+             (deftheme ,name ,description)
              ,@(cl-loop for n from 0 to (1- n-displays)
                         collect
                         `(let* ,(autothemer--extract-let-block full-palette n)
@@ -96,7 +97,6 @@ bindings within both the REDUCED-SPECS and the BODY."
                                                     ,(autothemer--demote-heads 
(elt it 1))))
                                                  reduced-specs))
                                   ))))
-             (deftheme ,name ,description)
              (apply #'custom-theme-set-faces ',name
                     (cl-loop for ,temp-n from 0 to ,(1- n-faces)
                              collect (list (elt ',face-names ,temp-n)