diff options
Diffstat (limited to 'src/html-abbrev.el')
| -rw-r--r-- | src/html-abbrev.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/html-abbrev.el b/src/html-abbrev.el index 8f5cba9..db2e83e 100644 --- a/src/html-abbrev.el +++ b/src/html-abbrev.el @@ -557,7 +557,12 @@ input (zencoding-process-filter (zencoding-default-filter) input)))))) -(defun zencoding-transform (ast-with-filters) +(defun zencoding-html-transform (input) + (let ((ast (car (zencoding-expr input)))) + (when (not (eq ast 'error)) + (zencoding-transform-ast-with-filters ast)))) + +(defun zencoding-transform-ast-with-filters (ast-with-filters) "Transform AST (containing filter data) into string." (let ((filters (cadr ast-with-filters)) (ast (caddr ast-with-filters))) |