adoption-insert ( document node ancestor -- )

Vocabulary

html5

Inputs

document	an object
node	an object
ancestor	an object

Outputs

None

Definition

USING: accessors kernel sequences ;

IN: html5

:: adoption-insert ( document node ancestor -- )
    node detach-node ancestor html-element? ancestor name>>
    { "table" "tbody" "tfoot" "thead" "tr" } member? and
    [ document node adoption-foster-node ]
    [ node ancestor attach-node ] if ;