diff options
author | Andrey Listopadov <andreyorst@gmail.com> | 2022-10-15 19:03:03 +0300 |
---|---|---|
committer | Andrey Listopadov <andreyorst@gmail.com> | 2022-10-17 09:18:51 +0300 |
commit | 6b344a919754d53070280e691924011ad9086c76 (patch) | |
tree | b56f854bc40b2c6c9840241b4cc0c3a2b38ab5a8 /test/lisp/use-package/use-package-tests.el | |
parent | c0338e06cd6e346bcfc69c53010fc8170c1bd979 (diff) | |
download | emacs-6b344a919754d53070280e691924011ad9086c76.tar.gz emacs-6b344a919754d53070280e691924011ad9086c76.tar.bz2 emacs-6b344a919754d53070280e691924011ad9086c76.zip |
Use face-spec-set instead of custom-set-faces
GitHub-reference: https://github.com/jwiegley/use-package/issues/934
Copyright-paperwork-exempt: yes
Diffstat (limited to 'test/lisp/use-package/use-package-tests.el')
-rw-r--r-- | test/lisp/use-package/use-package-tests.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el index 1ccd3ad0786..7d98ca99e4a 100644 --- a/test/lisp/use-package/use-package-tests.el +++ b/test/lisp/use-package/use-package-tests.el @@ -1156,7 +1156,7 @@ (match-expansion (use-package foo :custom-face (foo ((t (:background "#e4edfc"))))) `(progn - (custom-set-faces (backquote (foo ((t (:background "#e4edfc")))))) + (apply #'face-spec-set (backquote (foo ((t (:background "#e4edfc")))))) (require 'foo nil nil)))) (ert-deftest use-package-test/:custom-face-2 () @@ -1166,11 +1166,11 @@ (example-1-face ((t (:foreground "LightPink")))) (example-2-face ((t (:foreground "LightGreen"))))) `(progn - (custom-set-faces - (backquote (example-1-face ((t (:foreground "LightPink")))))) - (custom-set-faces - (backquote (example-2-face ((t (:foreground "LightGreen")))))) - (require 'example nil nil)))) + (apply #'face-spec-set + (backquote (example-1-face ((t (:foreground "LightPink")))))) + (apply #'face-spec-set + (backquote (example-2-face ((t (:foreground "LightGreen")))))) + (require 'example nil nil)))) (ert-deftest use-package-test/:init-1 () (match-expansion |