write-children ( tag -- )

Vocabulary

xml.writer.private

Inputs

tag

an object

Outputs

None

Definition

USING: accessors sequences xml.writer ;

IN: xml.writer.private

: write-children ( tag -- )
    indent children>> ?filter-children [ write-xml ] each
    unindent ;