define-attribute-word ( name -- )

Vocabulary

html.elements

Inputs

name

an object

Outputs

None

Definition

USING: kernel sequences ;

IN: html.elements

: define-attribute-word ( name -- )
    dup "=" prepend swap [ write-attr ] curry
    ( string -- ) html-word ;