diff options
Diffstat (limited to 'src/html-abbrev.el')
| -rw-r--r-- | src/html-abbrev.el | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/src/html-abbrev.el b/src/html-abbrev.el index ccc233e..7dbf842 100644 --- a/src/html-abbrev.el +++ b/src/html-abbrev.el @@ -553,16 +553,17 @@ (self-closing? (and (not (or tag-txt content)) (or (not tag-has-body?) (and settings (gethash "selfClosing" settings))))) - (lf (if (or content-multiline? block-tag?) "\n"))) + (block-indentation? (or content-multiline? (and block-tag? content))) + (lf (if block-indentation? "\n"))) (concat "<" tag-name id classes props (if self-closing? "/>" (concat ">" (if tag-txt - (if (or content-multiline? block-tag?) + (if block-indentation? (emmet-indent tag-txt) tag-txt)) (if content - (if (or content-multiline? block-tag?) + (if block-indentation? (emmet-indent content) content)) lf @@ -606,15 +607,16 @@ (lambda (prop) (concat ":" (symbol-name (car prop)) " \"" (cadr prop) "\"")))) (content-multiline? (and content (string-match "\n" content))) - (block-tag? (and settings (gethash "block" settings)))) + (block-tag? (and settings (gethash "block" settings))) + (block-indentation? (or content-multiline? (and block-tag? content)))) (concat "[:" tag-name id classes props (if tag-txt (let ((tag-txt-quoted (concat "\"" tag-txt "\""))) - (if (or content-multiline? block-tag?) + (if block-indentation? (emmet-indent tag-txt-quoted) (concat " " tag-txt-quoted)))) (if content - (if (or content-multiline? block-tag?) + (if block-indentation? (emmet-indent content) (concat " " content))) "]"))) |