aboutsummaryrefslogtreecommitdiff
path: root/test/tests.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2014-12-09 16:42:06 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2014-12-09 16:42:06 +0000
commit804e18ee0246709475aa6a500191f143a193b5b8 (patch)
tree00fc5da4031932315956e79952aa4cce2e68e6db /test/tests.el
parenta983476a59701f1cc01580b16fc5235360054adf (diff)
parentdb82dc546b528eef2487820381884c7c67e3683a (diff)
Merge pull request #136 from vermiculus/fix-@highligthing
Fix @highligthing
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