aboutsummaryrefslogtreecommitdiff
path: root/test/tests.el
diff options
context:
space:
mode:
Diffstat (limited to 'test/tests.el')
-rw-r--r--test/tests.el11
1 files changed, 11 insertions, 0 deletions
diff --git a/test/tests.el b/test/tests.el
index 43531b4..b997c6e 100644
--- a/test/tests.el
+++ b/test/tests.el
@@ -134,6 +134,17 @@
'(sx-assoc-let data
(cons .test-one .test-two))))))
+(ert-deftest sx--user-@name ()
+ "Tests macro expansion for `sx-assoc-let'"
+ (should
+ (string=
+ (sx--user-@name '((display_name . "ĥÞßđłřğĝýÿñńśşšŝżźžçćčĉùúûüŭůòóôõöøőðìíîïıèéêëęàåáâäãåąĵ★")))
+ "@hTHssdlrggyynnsssszzzccccuuuuuuooooooooiiiiieeeeeaaaaaaaaj"))
+ (should
+ (string=
+ (sx--user-@name '((display_name . "ĤÞßĐŁŘĞĜÝŸÑŃŚŞŠŜŻŹŽÇĆČĈÙÚÛÜŬŮÒÓÔÕÖØŐÐÌÍÎÏıÈÉÊËĘÀÅÁÂÄÃÅĄĴ")))
+ "@HTHssDLRGGYYNNSSSSZZZCCCCUUUUUUOOOOOOOOIIIIiEEEEEAAAAAAAAJ")))
+
(ert-deftest thing-as-string ()
"Tests `sx--thing-as-string'"
(should