summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorProtesilaos Stavrou <info@protesilaos.com>2026-04-10 15:57:36 +0300
committerProtesilaos Stavrou <info@protesilaos.com>2026-04-10 15:57:36 +0300
commit087b419503db4e8e2fc12120af7b4879423347ea (patch)
tree5f2d781aa38ed91db3f5e485a7ea89b2f7860793
parentd76bbf98656de49db0a5e4bbad432a3f7324a11c (diff)
Write a test for modus-themes--belongs-to-family-p
-rw-r--r--tests/modus-themes-test.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/modus-themes-test.el b/tests/modus-themes-test.el
index cec3c3d..9e6e6c1 100644
--- a/tests/modus-themes-test.el
+++ b/tests/modus-themes-test.el
@@ -113,6 +113,11 @@ Also see `modus-themes-test--modus-themes--hex-to-rgb'."
(should-not (modus-themes--belongs-to-family-p 'my-fancy-theme 'modus-themes))
(should-not (modus-themes--belongs-to-family-p 'modus-operandi 'my-fancy-themes)))
+(ert-deftest mtt-modus-themes-get-all-known-themes ()
+ "Test that `modus-themes-get-all-known-themes' does the right thing."
+ (should (equal (modus-themes-get-all-known-themes) modus-themes-items))
+ (should-not (modus-themes-get-all-known-themes 'my-fancy-themes)))
+
(ert-deftest mtt-inheritance ()
"Ensure all faces inherit from valid faces."
;; Third-party packages, loaded if possible to better test face inheritance.