yogsototh/emacs-doom-themes
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update tests

Browse source 
To reflect recent changes
This commit is contained in:
Henrik Lissner 2019-06-29 14:07:20 +02:00
parent af7f41c9e6
commit 22c8246807
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
test/test-helper.el
View file

@ -4,7 +4,7 @@
(push (expand-file-name "../themes" (file-name-directory load-file-name)) load-path)
(require 'doom-themes)
(require 'doom-themes-common)
(require 'doom-themes-base)
(defalias '-color-p 'doom-themes--colors-p)
;; (defalias '-build-face 'doom-themes--build-face)
@ -19,9 +19,9 @@
(defmacro -with-colors! (colors &rest body)
(declare (indent defun))
`(let ((doom-themes--colors ',colors))
`(let ((doom-themes--palette ',colors))
(let* (,@colors)
(setq doom-themes--colors
(setq doom-themes--palette
(list ,@(cl-loop for (var val) in colors
collect `(cons ',var ,val))))
,@body)))