adjust-foreign-attribute ( name -- name' )

Vocabulary

html5

Inputs

name

an object

Outputs

name'

an object

Definition

USING: accessors assocs kernel sequences ;

IN: html5

: adjust-foreign-attribute ( name -- name' )
    dup foreign-attribute-adjustments at [
        nip first2 foreign-attribute new swap >>name
        swap >>prefix
        dup prefix>> attribute-namespace >>namespace
    ] when* ;