xml-post-data ( xml -- post-data )

Vocabulary

xml-rpc.private

Inputs

xml

an object

Outputs

post-data

an object

Definition

USING: accessors http io.encodings.string io.encodings.utf8
kernel xml.writer ;

IN: xml-rpc.private

: xml-post-data ( xml -- post-data )
    xml>string utf8 encode "text/xml" <post-data> swap >>data ;