aboutsummaryrefslogtreecommitdiffstats
path: root/src/test.el
diff options
context:
space:
mode:
Diffstat (limited to 'src/test.el')
-rw-r--r--src/test.el29
1 files changed, 29 insertions, 0 deletions
diff --git a/src/test.el b/src/test.el
index 40f255a..05f7a24 100644
--- a/src/test.el
+++ b/src/test.el
@@ -701,5 +701,34 @@
#'emmet-expand-jsx-className?-test
'(((".jsx>ul.lis>li.itm{x}*2") . "<div className=\"jsx\">\n <ul className=\"lis\">\n <li className=\"itm\">x</li>\n <li className=\"itm\">x</li>\n </ul>\n</div>")))
+(defun emmet-self-closing-tag-style-test (lis)
+ (let ((es (car lis))
+ (emmet-preview-default nil))
+ (with-temp-buffer
+ (emmet-mode 1)
+ (insert es)
+ (emmet-expand-line nil)
+ (buffer-string))))
+
+;; By default, `emmet-self-closing-tag-style' must not break any test code.
+(emmet-run-test-case "Self closing tag style 1"
+ #'emmet-self-closing-tag-style-test
+ '((("meta") . "<meta/>")))
+
+(let ((emmet-self-closing-tag-style "/"))
+ (emmet-run-test-case "Self closing tag style 2"
+ #'emmet-self-closing-tag-style-test
+ '((("meta") . "<meta/>"))))
+
+(let ((emmet-self-closing-tag-style " /"))
+ (emmet-run-test-case "Self closing tag style 3"
+ #'emmet-self-closing-tag-style-test
+ '((("meta") . "<meta />"))))
+
+(let ((emmet-self-closing-tag-style ""))
+ (emmet-run-test-case "Self closing tag style 4"
+ #'emmet-self-closing-tag-style-test
+ '((("meta") . "<meta>"))))
+
;; start
(emmet-test-cases)