write-attr ( value name -- )

Vocabulary

html.elements

Inputs

value	an object
name	an object

Outputs

None

Definition

USING: present xml.entities ;

IN: html.elements

: write-attr ( value name -- )
    " " write-html write-html "='" write-html
    present escape-quoted-string write-html "'" write-html ;