diff options
Diffstat (limited to 'src/test.el')
-rw-r--r-- | src/test.el | 29 |
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) |